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PREFACE 



This book is a welcome mat for the Intellec Series III Microcomputer Development System. It is 
also an introduction to the world of software development for micro-applications. We assume 
that you have some basic knowledge of microprocessors and their applications, but few 
demands are made on that knowledge. We do not assume that you have had exposure to any 
particular programming language. This book can be useful to beginners, and even 
sophisticated readers should find it rewarding to skim through. 

This book is a tutorial for using the Series III system, especially the "8086 side" of it (the 8086 
execution environment). The "8085 side" is similar to a Series II system, which is described in 
A Guide to Intellec Microcomputer Development Systems by Daniel McCracken. 

We lead you through a typical software development process by providing an example of a 
micro-application: a climate control system for a building. To keep the example easy to 
understand, we only describe the software development effort, assuming that the hardware for 
the climate system is being developed simultaneously. In fact, we illustrate some typical prob- 
lems in software development that occur as a result of changing hardware designs. 

Chapter 1 gives an overall view of the Series III system and the application example. It also 
describes top-down design, stepwise refinement, modular programming, design considera- 
tions, and how to choose the proper software language for each module. 

Chapter 2 is a step-by-step tutorial on the Series III operating system, showing typical 
operations. 

Chapter 3 is a step-by-step tutorial on CREDIT, and it incidently shows the process of stepwise 
refinement of the application's main control algorithm. 

Chapter 4 describes Pascal-86 programming, structured and modular design, parameter pass- 
ing, data typing, and the Pascal-86 compiler. 

Chapter 5 describes PL/M-86 programming, and it shows a sample PL/M-86 routine used in the 
application. It also briefly describes the PL/M-86 compiler and the 8086/8087/8088 Macro 
Assembler. 

Chapter 7 describes program debugging with DEBUG-86 and hardware emulation with the 
ICE-88 emulator. 

There is also a bibliography of related material, and a list of Intel manuals supplied with the 
Intellec Series III Microcomputer Development System. 
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CHAPTER 1 
THE SOFTWARE DEVELOPMENT PROCESS 



"Hardware is computing potential] it must be harnessed and driven by software to be useful." 

-Andrew S. Grove, President of Intel Corp. 



The Intellec Series III Microcomputer Development System is more than a keyboard, a video 
display, an integral disk drive, and a box with two microprocessors. It is a useful tool for 
designing microcomputer software for the iAPX 86,88 processor family or for the 8080/8085 pro- 
cessors. You can choose the appropriate language (PL/M, FORTRAN, Pascal, macro- 
assembly language) for each piece of software, debug these pieces separately, and link them 
in different ways for different applications. The applications can then be run on this system or 
any other system that is based on the iAPX 86,88 or 8080/8085 families of processors. 

Intel's iAPX microprocessor family provides an architecture best suited for modular software 
development using high-level languages. The Intellec Series III Microcomputer Development 
System takes full advantage of this architecture to provide a more cost effective programming 
environment that guarantees a shorter development cycle. 

To design a product that will contain a microprocessor, you must coordinate two efforts: the 
design of the hardware that surrounds the microprocessor, and the design of the software that 
controls the microprocessor. Hardware development involves planning the interaction of the 
microprocessor, the associated memory and peripheral circuits, and the specialized 
input/output circuits and processors. Software development involves programming the 
microprocessor with instructions that will eventually be stored in the product's memory. 
These instructions must be designed to correctly perform the required tasks. 

It is possible to carry out these development efforts independently-the hardware develop- 
ment separate from the software development. In practice, however, it takes a long time to 
develop error-free software on prototype hardware. To achieve good system integration and to 
save time, software debugging must usually begin long before prototype hardware is available 
to test the software. 

The Intellec Series III with in-circuit emulation (ICE) is a development solution because it pro- 
vides support for parallel hardware and software development efforts. Using the ICE-86 or 
ICE-88 emulator, you can emulate parts of your prototype hardware in order to test your soft- 
ware in a stable environment that resembles your final product. The ICE-86 or ICE-88 emulator 
also allows you to substitute memory and other resources from the Series III system for the 
memory and resources missing in your prototype hardware. With the ICE-86 or ICE-88 
emulator, prototype hardware can be added to your product as you are designing it, and soft- 
ware and hardware testing can occur simultaneously (thereby speeding up the entire develop- 
ment process). 
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The chart in figure 1-1 summarizes a software development process, starting with an idea for a 
final product. Such a process always starts with an idea, which you refine step by step until 
you can define the actual product's environment, hardware, and logic. 

To provide a tutorial on using the Intellec Series III system, and to show how Intel's software 
development tools are used in a development situation, we provide a simple software applica- 
tion for the iAPX 88 microsystem, at the heart of which is an 8088 microprocessor. The applica- 
tion is a climate control system for a building that uses a solar collector for heating and cool- 
ing, with backup methods of heating and cooling when the solar collector is not adequate. All 
methods use water, storage tanks, and a water-to-air exchanger or heat pump. 
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SOFTWARE DEVELOPMENT PROCESS 

Several decisions about this climate control system can be deferred to a later date. For exam- 
ple, by designing the system's software in a modular fashion, we can add more methods of 
heating or pooling as necessary, and we can decide how to handle water pumps and valves at a 
later date. We know now that the software's primary purpose is to choose a method of heating 
or cooling based on temperature data, and to operate the climate system's pumps and valves. 
Figure 1-2 is a simplified block diagram of the application. 

DEFINING THE PRODUCT'S SOFTWARE 

As you define your product's hardware, you must also define the purpose of its software. For 
example, the purpose of the software for our application is to gather and store the appropriate 
temperature data, decide on a heating or cooling method based on that data, implement the 
method in the climate system, and maintain the operation of the climate system. Each task can 
be designed as a piece of software called a module. By keeping tasks modular, you can 
change the details of any task without affecting the details of the other tasks. 

Keep in mind that software provides the capability to change or add to the product. The entire 
product could consist of hardware and logic circuits, but then you might have to rebuild each 
unit to add more capabilities or change the flow of the logic. Software that is not modular and 
easy to maintain does not solve this problem; therefore, you must define the entire purpose of 
the software, with an eye to the future of your product. Keep it modular so that you can replace 
modules easily without rewriting modules that already work. 

For our climate control system, we defined the software to be a set of modules that receive and 
store data, decide heating or cooling methods based on that data, and decide how to operate 
the hardware associated with the climate system. 

At this time, we do not need a more detailed definition; in fact, more detail would hinder our 
process of step by step refinement. It is important to realize the order for these actions: first, 
the software has to start up the climate system, Once started, the software has to do several 
things over and over (unless the system shuts down): (1) read the various temperatures, (2) 
store the data for future reference, (3) decide on a heating or cooling method to use, and (4) 
operate the climate system to provide heating or cooling and to maintain the system (e.g., 
maintain heat gain). 
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Figure 1-2. Block Diagram of Our Climate Control System 



121632-2 



CHAPTER 1 



A good software definition breaks the problem into solvable tasks. The order in which these 
tasks must occur also determines the structure of the software. If the structure is simple to 
understand, it will be that much easier to implement and maintain. 

A Nassi-Shneiderman Chart (shown in figure 1-3) is useful for showing structured blocks of 
software. Use whatever charts you find useful, but hide many of the details so that you are not 
locked into doing things a certain way. In our application, we hid all details about data types, 
input and output, and actual heating or cooling methods. It is most important that we design 
each module to be self-reliant; that is, a module should not have to know about details hidden 
in another module, especially details that might change in the future. 
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SOFTWARE DEVELOPMENT PROCESS 

CHOOSING THE SOFTWARE DEVELOPMENT TOOLS 

It is unfortunate but common in this industry to find software development systems sorely 
lacking in the tools of the trade. There are some systems that force you to put together a whole 
program in the limited space they allow, and they don't provide the facility to create a library of 
canned routines that you could use with many different programs. 

The Intellec Series III system provides both the ability to put together partial programs, and the 
facilities to build libraries of routines that you can link to different programs. The concept of 
module is inherent in this system. Whenever you build a partial program, it is a module; and 
the module can refer to procedures, functions, and variables in other modules found in 
libraries. 

For our application, we do not have to decide on one programming language— the Intellec 
Series III system supports several, including the high-level languages PL/M-86, Pascal-86, and 
FORTRAN-86. We can, however, decide whether or not to use modules that already exist, and 
design our application with that decision, or change the decision later and create another 
module to replace it. 

For example, we already have a module written in PL/M-86 that performs a routine to convert 
thermocouple voltage into degrees Celsius. We can decide now to tentatively use it, thereby 
saving time by not coding this routine into our main program. We can also decide, at a later 
time, not to use it, and substitute our own module to do it. The decision to link which module 
does not have to be made until the main program is finished! 

By choosing the right tools you can save time and defer decisions on specific details until you 
are ready to deal with the details. By deferring such decisions, you keep your software 
development effort from becoming too cluttered with rigid design decisions, and you keep the 
effort flexible enough to accept change. 

The right tools are (1) appropriate high-level languages to choose from, (2) a way to manage 
libraries of canned routines, (3) a linker that allows you to link finished (or unfinished) modules 
in different ways for different applications, (4) a locater that will locate programs in memory for 
you, yet give you the opportunity to specify locations for sections of the program, (5) a sym- 
bolic debugger you can use to test modules and partial programs easily, and (6) an in-circuit 
emulator to emulate parts of your final product before they exist. The Intellec Series III 
Microcomputer Development System supports all of. these tools. 



LANGUAGES 

When designing a system using top-down techniques, you think in and express concepts in 
the highest-level language possible at each refinement step in order to expose the logical con- 
cepts and conceal the details. 

How can you tell whether you are thinking in a language that is "high-level"? A language is 
"high-level" for a given application if you use it to define the overall structure of the software. 
You use a lower-level language to express in great detail each piece of code. With a high-level 
language you gain a clear understanding of the control structures of the system at the highest 
level, and you expose logical flaws in the structure that would have led to subtle bugs in the 
code. With these advantages in mind, it makes sense to start your programming with the 
highest-level language: English. After you have defined the software in English, you can use a 
high-level programming language like Pascal, which allows you to express more detailed code 
in a language that resembles English. 
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In Chapter 3, we refine our climate control algorithm step by step. We use as a language 
something called Pidgin Pascal, which is really a language of concise declarative English 
sentences. Since our control structures can be translated easily from English into Pascal, we 
decided to use Pascal-86 for our main climate control module (this decision does not have to 
be final). We do not start the translation into Pascal-86 until after we have tested the logic of our 
Pidgin Pascal algorithm. 

Pascal is a language that resembles the control structures of human thought. We don't think in 
terms of GO TO branches normally; we consider a job to be a set of tasks to DO WHILE 
something is true, or to DO UNTIL something is done. IF something is true or false, THEN do 
one thing; ELSE do another thing. In the CASE of several different problems, solve each one 
accordingly. Occasionally we might need a disaster bail-out (GO TO a panic routine), but we 
should be planning our algorithm to take care of disasters elegantly. 

The point is: we should think about control structures of a system as structures, not as 
individual branch statements. Pascal is one language that was designed to express control 
structures; PL/M is another, and some new versions of FORTRAN can be structured 
accordingly. 

Another point should now be obvious: you should choose the language best suited for the 
algorithm. For example, our module that operates the climate system has to manipulate pumps 
and valves to implement a chosen heating or cooling method. This operation module receives 
the data from the decision-making main module written in Pascal. The operation module might 
use bits in a word as control signals to send to the procedure that actually interfaces to the 
hardware of the climate system. 

We can code this operation module in assembly language or PL/M, since both languages can 
easily manipulate bits in a byte or word and respond with appropriate actions based on the 
pattern of bits. Our final decision will be made later; in the meantime, we will use a test version 
of the operation module, until prototype hardware for the climate system is ready. Our test ver- 
sion will be written in Pascal, and it will simply display appropriate test information at the 
console. 

It is most likely that the final version of the operation module will not be written in Pascal, since 
Pascal does not provide bit manipulation operations. We can also guess that the module will 
not be written in FORTRAN-the advantage FORTRAN has over PL/M is its ability to express 
complex mathematical formulas. Our climate control system has no complex mathematical 
formulas. 

We would code the final version of the operation module in assembly language if the applica- 
tion required the most efficient use of processor time and memory; however, PL/M program- 
ming saves development and maintenance time since it is easier to learn and the programs are 
easier to read and maintain. The only drawback to PL/M is that it is not as efficient in time or 
memory, and it cannot compute decimal or real arithmetic. These are not drawbacks in our 
application, since we do not need decimal or real arithmetic, nor do we have severe speed and 
memory constraints. The advantage of saving development time and maintenance costs with 
PL/M far outweigh the advantages of using assembly language. 



MODULAR PROGRAMMING 

The Intellec Series III system has the linking and locating tools to support modular pro- 
gramming, and the library utility to maintain libraries of canned routines. The decisions we 
make at this time are not binding, but they can be very helpful: we can decide now what types 
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of routines will be separated into which modules. We have several design criteria for making 
these decisions. We must be able to (1) write the routines of one module with little knowledge 
of the code in other modules, and (2) reassemble and replace any module without affecting 
other modules. Each module of our climate control system will contain design decisions that 
are hidden from the other modules so that the decisions are not binding. 

With these criteria in mind, we designed our system to have several modules: the GetData 
module gets and stores our data, the Operation module performs the actual climate system 
operation (turning pumps and valves on and off, etc.), and the Main module makes the high- 
level decisions. 

The only binding decisions to be made at this time concern the data passed between modules. 
We try to keep data passing to a minimum, or we try to enforce a data-passing standard that is 
easy to comply with. In our climate system, we only need to pass a reference to a data record 
to the other modules; the other modules must know what to do with the reference. This data- 
passing technique is one of the two we can use: pass-by-reference and pass-by-value, which 
are described in more detail in Chapter 4. 

With the Intellec Series III system capabilities, we can design different versions of the same 
module, test each version, and decide at a later time which version to link with the other 
modules. We can also defer decisions about the physical memory locations (locations in our 
final product's memory) for these modules until after we have debugged our prototype hard- 
ware with an In-Circuit Emulator (ICE-86 or ICE-88). In some applications, you never have to 
decide physical memory locations; the Intellec Series III locater can decide them for you. 



DEBUGGING AND IN-CIRCUIT EMULATION v 

At any time during software development, you can test a compiled module using DEBUG-86. In 
certain cases you will want to alter the module to be self-contained; for example, our main 
module needs the appropriate data from the GetData module, but the GetData module is not 
yet written. We can quickly write a procedure that obtains the data from an interactive session 
at the console, link this temporary data acquisition module to our main module, and test our 
main module using DEBUG-86. 

When we have our modules coded and compiled, we can test the modules in an ICE-86 or 
ICE-88 session that can emulate the final product's processor. We can use an ICE-86 emulator 
if our final product will contain an 8086 processor, or use an ICE-88 emulator if it will contain an 
8088 processor (remember, our iAPX 86, 88 applications software can run on either an 8086 or 
an 8088). 

For example, our data module will read data from ports of an 8088 processor in our final prod- 
uct. The ICE-88 emulator can emulate those ports before we ever have a prototype of the final 
product. Using ICE-88, you can begin testing your software before any prototype hardware 
exists. As portions of your prototype become available, you can use them and still borrow 
resources like memory from your Series ill system. 

With in-circuit emulation, you control, interrogate, revise, and completely debug your product 
in its own environment, or in a stable environment that emulates the final product's environ- 
ment. Symbolic debugging is one of the key features of Intellec microcomputer development 
systems and in-circuit emulators. Symbolic debugging allows you to debug your program 
using its own symbols and line numbers— you do not have to convert your symbols to physical 
memory addresses. 
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USING YOUR FINAL PRODUCT 

Intel supplies other tools to help you put together your final product. If you designed your 
product to have its software in ROM (read-only memory), you can use Intel's Universal PROM 
Programmer (UPP) with its Universal PROM Mapper (UPM) software to create the PROM 
(programmable read-only memory) device to hold the software. You can then install your 
device in an SDK-86 or SDK-88 (System Design Kit with an 8086 or 8088 processor), or in an iSBC 
(Single Board Computer) system. 

You can also run your software in other systems, or in dedicated application environments. For 
example, you could transfer your software to RAM (random-access memory) on an SDK-86 or 
SDK-88, or to RAM on an iSBC 86/12A (Single Board Computer system with an 86/12A board), 
by first using the OH86 utility described in the iAPX 86,88 Family Utilities User's Guide for 8086- 
Based Development Systems to convert the program to hexadecimal object format. You would 
then use an appropriate tool to load the software into your execution board (the ICE-86 
In-Circuit Emulator, the SDK-C86 Software and Cable Interface, or the iSBC 957 Interface and 
Execution Package). 

You can also use your Series III development system as the environment for your final soft- 
ware product. The Series III system has an 8086 processor (the "8086 side" or 8086 execution 
environment) to run iAPX 86, 88 applications software. As soon as you have debugged your 
software, it is ready to be used in any Series III system. Chapter 6 describes the run-time 
libraries you use to run your Pascal-86 programs in the Series III environment; you can also 
supply your own versions of these libraries to run these programs in another execution 
environment. Chapter 6 also shows how you can link modules and locate them in Series III 
memory in one easy step to prepare them for execution in the Series III system. 

Whatever environment you choose for your final product, Intel provides the appropriate hard- 
ware and software tools to develop, debug, and produce your final product. The Intel 
environments that are suitable for final software products are excellent investments which can 
be upgraded for the software of the future. 



CHAPTER 2 
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"The benefits of using a standardized operating system should prove to be as significant as 
the benefits of using standardized microcomputer hardware. Development and programming 
costs will be reduced substantially, and you will have an upward compatible interface for future 
products." 

—Andrew S. Grove, President of Intel Corp. 



As you learned in Chapter 1, the Intellec Series III Microcomputer Development System con- 
tains the tools you need to develop software for your application. To use these tools, you must 
operate the system; that is, use the system's commands and utility programs. 

A large multi-user computer system can serve as a useful analogy to point out the difference 
between programming the system and using the system. A working system usually supports 
both kinds of activities. In such a large system, one or more programmers might be designing 
programs to run on the system. One or more users (who might also be programmers) might be 
simply using the programs that have already been developed for the system. Obviously, a user 
does not need to know complicated details about the system to use it, whereas a programmer 
needs to know such details to write programs for the system. 

The Series III system has most of the capabilities of larger systems, but it is only used by one 
person at a time. This person could be using the system and its programs, or writing programs 
for the system. 

We wrote this chapter for people who need to know how to use the system. This information is 
important to anyone using or programming the system, but it is not burdened with details that a 
first-time user does not need. As we describe system commands and utility programs, keep in 
mind that we swept the more complicated details under the rug to keep the chapter easy to 
read. For more details on all of the system commands, see the Intellec Series III Micro- 
computer Development System Console Operating Instructions. 

TURNING ON YOUR SYSTEM 

Every microcomputer has something called an operating system, which is sometimes called a 
supervisor or monitor. It is usually the first piece of software you use— the software that is con- 
trolling your computer when you first turn it on, and the software that responds to your first 
typed command. Typically, you type a command to ask the computer for a list of the files you 
have on disk, or to execute a particular program. 

When you turn on the Intellec Series III Microcomputer Development System, the following 
message appears on your screen: 

SERIES II MONITOR, Vx.y 
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This message tells you that the monitor is up and running (the x and y represent version 
numbers). The monitor is a piece of software that gives you direct control of the Series III hard- 
ware. Although you can use the monitor for debugging and other operations, for your pur- 
poses the monitor performs one quick activity: it loads the operating system from the system 
disk in drive into the computer when you push the RESET button. 

To load or "boot" the system, you need a system disk: a disk that holds the operating system 
files. Intel supplies a flexible disk labeled "ISIS-II Operating System" which is your system 
disk. One of the first operations you will perform is a formatting operation to create another 
copy of the system disk— a copy designed to be used with the examples in this book. 

You insert the "ISIS-II Operating System" disk into flexible disk drive 0, and push the RESET 
button (for more detailed instructions, see the Intellec Series III Microcomputer Development 
System Console Operating Instructions). The following message should appear on your 
screen: 

ISIS-II, Vx.y 

The operating system for the Intellec Series III Microcomputer Development System is called 
ISIS-II ("ISIS" stands for Intel Systems Implementation Supervisor). Thex ahd y represent ver- 
sion numbers. ISIS-II is actually a version of the ISIS operating system that runs on older 
Intellec systems (the Intellec Microcomputer Development System and the Intellec Series II 
Microcomputer Development System). 

ISIS-II manages your use of the software tools supplied with the system. Using ISIS-II, you can 
run utility programs like CREDIT (a text editor) to write programs, or LINK86 to link program 
modules into a final program. You also use ISIS-II to run compilers like the Pascal-86 and 
PL/M-86 compilers, and to run your own developed programs. You can also make copies of 
programs and control the devices attached to your system by using ISIS-II commands. 

In most computer operations, you manipulate files, which are collections of information. Every 
file has a name, called a filename. Files and filenames are described in detail after an introduc- 
tion to the most popular operating system command— the DIR command. 

You use the DIR command to display a directory of filenames on a certain disk. You use other 
commands to perform file management operations. For example, you use the COPY command 
to make copies of files, or to send copies of files to the printer to be printed. You use the 
RENAME command to change a file's filename. This chapter explains some of these 
commands. 



THE DIRECTORY LISTING 

The first command to learn is the easiest to use— the DIR command. When your system is up 
and running, you will see a dash (-) on the left side of the screen. This dash is called & prompt, 
and it tells you that the system is ready for your next command. You can now type the DIR com- 
mand by typing the letters "DIR", and execute the DIR command by pressing the RETURN 
key. The following example is shown in blue to show that it is something you type; the part of 
the example that is in ordinary black shows what the system displays. The symbol "<cr>" 
means that you must press the RETURN key ("cr" stands for the "carriage return" key found 
on most typewriters). 



10 



OPERATING THE SERIES III 

-DIR<cr> 

DIRECTORY OF : FO :970003 . 06 

NAME .EXT BLKS LENGTH ATTR NAME .EXT BUS LENGTH ATTR 
SYSTEM. LIB 24 2849 US FPAL .LIB 74 9125 W 
PLM80 .LIB 45 5615 U 

143 
1317/4004 BLOCKS USED 

When you execute the DIR command, the system displays a list of filenames called a directory 
listing. These filenames are the names of the files that are stored on the disk in drive 0. The 
DIR command displays the directory for the disk in drive unless you specify another drive 
number with the command, as explained in the next paragraph. Disk drive is usually the drive 
that holds the system disk (the disk that contains the system files), so by executing the DIR 
command by itself, you get a directory listing of some of the files on the system disk in drive 
(not all, because some files are invisible). 

You can use the DIR command to display the directory listing for disks in other disk drives, and 
for a hard disk subsystem, by specifying the drive number with the DIR command. For exam- 
ple, to see a directory listing for a disk in drive 1, insert the "CREDIT ISIS-II CRT-Based Text 
Editor" disk in drive 1 , and type the following command: 

-DIR 1<cr> 

DIRECTORY OF :F1 :970049.02 



NAME 


.EXT 


BLKS 


LENGTH ATTR 


NAME 


.EXT 


BLKS 


LENGTH ATTR 


CREDIT 




156 


19470 


CREDIT 


.HLP 


25 


2985 W 


ADDS 


.MAC 


3 


171 W 


MICROB 


.MAC 


3 


158 W 


VT52 


.MAC 


3 


163 U 


VT100 


.MAC 


3 


190 U 


1510T 


.MAC 


3 


165 W 


1510E 


.MAC 


3 


170 U 


LEAR 


.MAC 


2 


123 











201 
310/4004 BLOCKS USED 

The Intellec Series III Microcomputer Development System Console Operating Instructions 
give details about typical hard disk and flexible disk configurations, and the associated drive 
numbers. 

On each line of the directory listing, you are shown the name of a file. Some of these filenames 
are followed by a three-character extension, which is an optional identifier used to show types 
of files. These extensions are sometimes required for certain files that are used with certain 
programs. The section on filenames (following disk formatting) explains some of these 
extensions. 

Following each filename entry are three columns labeled "BLKS", "LENGTH", and "ATTR". 
The "BLKS" column tells you how many "blocks" of space the file occupies, where one block 
equals 128 bytes. The "LENGTH" column gives the actual number of bytes occupied by the 
file. At the bottom of the listing appears a message showing how many blocks are used out of 
the total number of blocks available on the disk. You can use block figures to describe file 
sizes and to determine whether a file of a given size (in blocks) will fit on a disk. 

The "ATTR" column might be empty, or it may contain a "W", "S", or both. This column tells 
you the attributes of each file— certain characteristics that govern the file's use. If a file has the 
"W" attribute, it is write-protected; that is, you cannot write to or delete (overwrite) the file. If a 
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file has the "S" attribute, it is a system file that occurs on most system disks. You use the 
ATTRIB command and file attributes to protect your files from inadvertant delete or write 
operations, and to designate certain files as system files (as shown in the next section). 

There are other files not displayed through normal use of the DIR command. These files are 
invisible', that is, they have the I attribute. You can see them if you use a special form of the DIR 
command: 



-DIR Kcr> 


















DIRECTORY OF 


:F0: 


970003.06 












NAME .EXT 


BLKS 


LENGTH 


ATTR 


NAME 


.EXT 


BLKS 


LENGTH 


ATTR 


ISIS .DIR 


26 


3200 


IF 


ISIS 


.MAP 


5 


512 


IF 


ISIS .TO 


24 


2944 


IF 


ISIS 


. LAB 


54 


6784 


IF 


ISIS .BIN 


94 


11740 


SIF 


ISIS 


. C LI 


20 


2407 


SIF 


ATTRIB 


40 


4909 


WSI 


COPY 




69 


8489 


WSI 


DELETE 


39 


4824 


WSI 


DIR 




55 


6815 


WSI 


EDIT 


58 


7240 


WSI 


FIXMAP 




52 


6498 


WSI 


HDCOPY 


48 


5994 


WSI 


HEXOBJ 




34 


4133 


WSI 


I DISK 


63 


7895 


WSI 


FORMAT 




62 


7794 


WSI 


LIB 


82 


10227 


WSI 


LINK 




105 


13074 


WSI 


LINK .OVL 


37 


4578 


WSI 


LOCATE 




120 


15021 


WSI 


OBJHEX 


28 


3337 


WSI 


RENAME 




20 


2346 


WSI 


SUBMIT 


39 


4821 


WSI 


SYSTEM. 


. LIB 


24 


2849 


WS 


FPAL .LIB 


74 


912 5 


W 


PLM80 . 
1317 


. LIB 


45 


5615 


W 


1317/4004 BLOCKS 


USED 















The "I" is called a switch, and it displays files that have the invisible attribute. When you 
specify the "I" switch in a DIR command, the DIR command displays all of the filenames, 
including ones that are invisible. The files that weren't displayed during the execution of a nor- 
mal DIR command are now displayed, along with their attributes (one of which is the "I" 
attribute). The "F" attribute is reserved for system files that are used to format the disk. These 
files are called format files, and you should never alter their attributes. 

You should practice using the DIR command, and at the same time, take a look at the directory 
listings for each disk you received. Take each flexible disk, insert it into drive 1 , and type "DIR 
1 " to see the directory listing. 

NOTE 

If you have a hard disk subsystem with only one flexible disk drive, use the following 
form of the DIR command: 

-DIR P<cr> 

LOAD SOURCE DISK, THEN TYPE (CR) 

Take out the system disk and insert the disk whose directory you want to display, 
then press the RETURN key. After the directory listing, the following message 
appears: 

LOAD SYSTEM DISK, THEN TYPE (CR) 

Put the system disk back into the flexible drive. To see other disk directory listings, 
repeat these steps for each disk. 
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FORMATTING DISKS 

We present in this section a typical scheme for storing copies of your Intel-supplied files on 
either hard disk or flexible disk. Subsequent examples in this book assume that certain pro- 
grams reside in hard disk drives and 1, or flexible disk drives and 1. You may use your own 
scheme and distribute files over disk drives as you wish, but in order to type the examples as 
they are, you must use the scheme presented here. If you understand the use of pathnames as 
described in this chapter, and if you use the COPY command correctly, you can copy files to 
disks in any distribution scheme you choose, and still use the examples in this book as long as 
you substitute your own pathnames. 

If you are using a hard disk subsystem, you must follow the procedures in the Intellec Series III 
Microcomputer Development System Console Operating Instructions to install your disk plat- 
ters and prepare them for use. If you are using flexible disk drives, you should refer to the 
same manual for instructions on the care and insertion of flexible disks. This section shows 
you how to prepare one hard disk platter or one flexible disk as the system disk, and another 
hard disk or flexible disk as a non-system disk (to hold your files and other programs). 



Hard Disk Subsystem Users 

Follow the instructions in the Intellec Series III Microcomputer Development System Console 
Operating Instructions to install and power-up your hard disk subsystem. When the hard disk 
subsystem is ready, insert your "ISIS-II Operating System" flexible disk into the flexible disk 
drive of your computer, and hit the RESET button. When the dash (-) prompt is displayed (after 
the ISIS-II message appears), type the following command: 

-:F4:F0RMAT : FO : SYSTEM . H DK S FROM 4<cr> 

This command prepares ("formats") drive of the hard disk to be the system disk. We chose 
"SYSTEM. HDK" for its name, but you can use any name that has at most six characters to the 
right of the period, and three to the left. When this operation is finished, and the system 
displays the dash (-) prompt, use the following command to transfer your system files to drive 
of the hard disk: 

-:F4:C0PY :F4:*.* TO :F0:<cr> 

This command will copy all of the files from the "ISIS-II Operating System" disk in the flexible 
disk drive (called drive 4) to the hard disk drive 0. When this operation is finished, you can 
remove the flexible disk from drive 4 and insert another flexible disk. In addition to the "ISIS-II 
Operating System" disk, you should also copy files from the "CREDIT ISIS-II CRT-Based Text 
Editor" disk, the "Resident 8086/8087/8088 Macro Assembler" disk, and the "Resident 
8086/8088 Utilities and Linkage Libraries" disk. For each flexible disk, execute the following 
command: 

-COPY : F4:* .* TO : F0 :<c r> 

This command copies all files from the flexible disk to drive of the hard disk. If you insert 
each flexible disk you received and perform this operation, you will have in drive all of the 
files from those flexible disks. If you want to be more selective about the files you are copying 
to drive 0, read the "Copying Files" section in this chapter. 
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You should also copy files to drive 1 of the hard disk subsystem. First, you must prepare drive 1 
by typing the following command: 

-FORMAT : F1 :PR0G86.HDK<cr> 

We chose "PROG86.HDK" for its name, because we intend to use it for our iAPX 86,88 applica- 
tion programs. If you are a Pascal-86 user, insert the "Pascal-86 Compiler and Run-Time 
Libraries" disk into flexible disk drive 4 and copy all of the files to the hard disk drive 1 : 

-COPY : F4:* .* TO : F1 : <c r> 

Do the same operation with your PL/M-86 flexible disk, and any other disks you have for your 
Series III system. The hard disk platters have plenty of room for your own files. 



Flexible Disk Users 

This section assumes that you have at least two double-density flexible disk drives. If you have 
single-density drives, you may run out of room if you try these examples. Refer to instructions 
in the Intellec Series III Microcomputer Development System Console Operating Instructions 
for information about flexible disks. 

To bring up your system, insert the "ISIS-II Operating System" disk into drive and push the 
RESET button. The ISIS-II message should appear, followed by the dash (-) prompt. Insert a 
blank disk into drive 1 , and type the following FORMAT command: 

-FORMAT : F1 :SYSTEM. FLX S<cr> 

This command creates a new system disk and automatically copies from drive all files that 
have the "S" attribute. When this operation is finished, you can test your new system disk by 
removing the "ISIS-II Operating System" disk from drive 0, inserting your new system disk into 
drive 0, and pushing the RESET button to restart the system. 

With your new system disk in drive 0, insert the "CREDIT ISIS-II CRT-Based Text Editor" disk 
into drive 1 , and type the following command: 

-COPY : F1 : CREDIT TO :F0:<cr> 

This command copies the program CREDIT to our system disk in drive 0. Remove the CREDIT 
disk from drive 1 and insert the "Resident 8086/8087/8088 Macro Assembler" disk into drivel. 
Type the following command: 

-COPY : F1 :RUN.* TO : F0:<cr> 
:F1:RUN COPIED TO :F0:RUN 
:F1:RUN.OV0 COPIED TO :FO:RUN,OV0 

This command copied two files at once— RUN and RUN. OV0— from drive 1 into drive 0. You 
need both files in order to use the special RUN command described later. 
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Remove the flexible disk from drive 1 and replace it with the "Resident 8086/8088 Utilities and 
Linkage Libraries" disk. Now type the following commands: 

-COPY : F1 : LIB86 . 86 TO :F0:<cr> 

: F1 : LIB86.86 COPIED TO :F0:LIB86.86 

-COPY :F1:LOC86.86 TO :F0:<cr> 
:F1:L0C86.86 COPIED TO :F0:LOC86.86 
-COPY : F1 : LINK86.86 TO :F0:<cr> 
:F1 : LINK86.86 COPIED TO : F0 : LI N K86 . 86 

You now have a system disk that is complete for the examples in this book. You still need 
another disk for the Pascal-86 compiler if you have one, to hold the compiler, the run-time 
libraries, and your sample program used in examples in this book. To prepare a blank disk to 
be a non-system disk, insert the blank disk into drive 1 and type the following command: 

-IDISK : F1 :PASC86. FLX<cr> 
NON-SYSTEM DISK 

The IDISK command can prepare both system and non-system disks, but it does not 
automatically copy files except the ISIS-II format ("F") files. 

With the new blank disk in drive 1 and the system disk in drive 0, you could put the "Pascal-86" 
disk in drive 2 (if you have a drive 2). The following example assumes that you only have drive 
and 1. To copy the files from the "Pascal-86" disk, first type the following command (don't 
forget the "P"!): 

-COPY * .* TO : F1 : P<cr> 

LOAD SOURCE DISK, THEN TYPE (CR) 

The system pauses (because you specified a "P" at the end of the command), and waits for 
you to insert the "source" disk into drive 0. The "source" disk in this case is the "Pascal-86" 
disk, assuming you are a Pascal-86 user (if you're using PL/M-86 only, you would substitute 
your PL/M-86 disk in this example). Insert this flexible disk into drive and press the RETURN 
key. 

LOAD OUTPUT DISK, THEN TYPE (CR) 

Since the disk to receive the Pascal-86 files is already in drive 1, you only have to press 
RETURN. The system should then display the above messages (along with the "COPIED" 
messages) every time it returns to drive to copy more files— all you have to do is continue to 
press RETURN until the entire copy operation is finished. 

You can repeat these steps with another blank disk for the PL/M-86 compiler. After these for- 
matting and copying operations, you should have disks that match the ones we used for the 
examples in this book. 



FILENAMES, PATHNAMES, AND FILE ATTRIBUTES 

Most operating system commands manipulate files. A file can be any collection of information 
including text, numeric data, program instructions, and combinations of all of these. You refer 
to a file by using a filename, and filenames follow certain naming conventions so that the name 
of a file also tells you the probable use of the file. 
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Filenames can have six or fewer characters, followed by an optional period and three- 
character extension. Extensions (and filenames themselves) follow certain conventions, but 
there are no fixed rules. Certain extensions are necessary for certain programs, as you shall 
see in the following discussion. The file naming conventions are relaxed so that you have the 
flexibility to create your own file naming conventions for your particular application. 

The term filename refers to both the name of the file and the extension, if any. Each new file 
you create must have a unique name for that disk (that is, you can have two files with the same 
name on two different disks, but not on the same disk). Some extensions have specific mean- 
ings to utility programs in the system, but these should not cramp the style with which you 
impose your own naming conventions. Here are the extensions that mean something to Intel- 
supplied programs: 

• The ".BAK" extension denotes a backup of a text file created by CREDIT, the text editor 
described in Chapter 3. For example, LETTER. BAK is the backup file for the text file 
LETTER.TXT (a text file does not need a particular extension, but "TXT" helps identify it). 

• The ".MAC" extension denotes a "macro" file used with certain programs like CREDIT. 
The ".MAC" files supplied with CREDIT enable you to use CREDIT on other non-Intel con- 
soles connected to Intel microcomputers. 

• The ".OVO" extension denotes an "overlay" file used with certain programs. 

• The ".OBJ" extension denotes an object module, which is created by a compiler or 
assembler, as described in Chapters 4 and 5. Compilers and assemblers also create files 
with the ".LST" extension to denote program listings (also described in Chapters 4 and 
5). Examples are PROG1 .OBJ and PROG1 .LST. 

• The ".LNK" extension denotes a collection of object modules that were linked together 
by the linker utility program, described in Chapter 6. When you run the locater utility pro- 
gram on a file with the ".LNK" extension, the locater strips the ".LNK" extension away, 
leaving only the file's name without an extension. 

• The ".LIB" extension denotes a library module that is maintained by the library utility. 
Library modules are described in Chapter 6. 

• The ".86" extension denotes a program that should be executed in the 8086 execution 
mode (the "8086 side" of the system). Examples are PASC86.86 and PROG1 .86. 

Most completed programs have either the ".86" extension (if they run in the 8086 execution 
mode, described later in this chapter), or no extension. For example, the DIR command is 
actually a program named "DIR" without any extension. 

In addition to the above extensions, we use the ".SRC" extension to denote a special text file 
that holds program instructions called source statements. A ".SRC" (for "source") file can be 
created by CREDIT and filled with assembly language, PL/M, or Pascal source statements; you 
can then compile this file to create an object module (".OBJ" file), as described in Chapters 4 
and 5. 

You can find more extensions explained in the Intellec Series HI Microcomputer Development 
System Console Operating Instructions . 

You can display the directory information for a single file by using a version of the DIR com- 
mand, DIR FOR: 

-DIR FOR SUBMIT<cr> 

DIRECTORY OF SYSTEM. FLX 

NAME .EXT BLKS LENGTH ATTR 

SUBMIT 39 4821 
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The file SUBMIT is in the directory for drive 0, so the DIR command had no trouble finding it. 
However, if SUBMIT happened to be on another disk in drive 1, you would have to tell DIR to 
look in drive 1 for the file. To do this, you use a pathname— a filename with a directory 
specifier. Whenever you specify a filename for a command or utility program, if the filename is 
in the directory for drive 0, you only have to specify the filename. If the filename is not in the 
directory for drive 0, you have to specify a pathname. 

A pathname consists of a directory specifier and a filename: 
:F1 :PR0G1 .SRC 

The ":F1:" part of the pathname is the directory specifier. The "1" stands for disk drive 1. 
Therefore, to get the directory information for the file PROG1.SRC on the disk in drive 1, type 
the following command: 

-DIR FOR : F1 : PR0G1 .SRC<cr> 

The number of separate disk drives depends on the configuration of your system. The format 
for directory specifiers is: 

: Fn: 

where n can be any drive number from to 9 (0 would refer to drive 0, which does not have to be 
specified). 

If you type a directory specifier that is incorrect, you get an error message. For example, sup- 
pose you typed the following DIR command with an incorrect directory specifier in the 
pathname for PROG1 .SRC: 

-DIR FOR :G1 :PR0G1 .SRC<cr> 

:G1 :PR0G1 .SRC, UNRECOGNIZED DEVICE NAME 

The "UNRECOGNIZED DEVICE NAME" is the ":G1:" directory specifier. ISIS-II thinks you are 
referring to a device by that name, and there is no device by that name. You will find legal 
device names in the section that describes copying files. 

Another common error occurs when you forget to use the word FOR in the DIR command when 
you are trying to get the directory information for one file. For example, you might type this 
command: 

-DIR : F1 :PR0G1 .SRC<cr> 

and get this error message: 

:F1 :PR0G1 .SRC, UNRECOGNIZED SWITCH 

Since you forgot the word FOR, ISIS-II thinks you are trying to specify a switch to the DIR com- 
mand—and it doesn't recognize ":F1:PROG1.SRC" as a switch! Switches are usually only one 
letter or number. Valid switches are described with the DIR command in the Intellec Series III 
Microcomputer Development System Console Operating Instructions. 
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The ATTRIB command assigns attributes to files. You use file attributes to protect your files 
from accidental deletions or modifications. You use the ATTRIB command to turn on or off the 
file attributes that are described below: 

• "W" for write-protected (The file cannot be written to, modified, renamed, or deleted 
unless this attribute is turned off.) 

• "I" for invisible (The file's name and information is only displayed when you execute the 
DIR command with the "I" switch.) 

• "S" for system files (System files on a source disk are automatically copied to the output 
disk in a FORMAT operation with the "S" switch.) 

• "F" for format files (Format files are automatically copied by the FORMAT and IDISK 
commands to format disks. Do not turn off this attribute, nor use it with your own files, 
unless you've read its description in the Intellec Series III Microcomputer Development 
System Console Operating Instructions.) 

For example, to turn on the "W" (write-protected) attribute for file CREDIT, type the following 
command: 

-ATTRIB CREDIT W1<cr> 

FILE CURRENT ATTRIBUTES 

:F0:CREDIT W 

To turn off the "W" attribute, specify a instead of a 1 : 

-ATTRIB CREDIT W0<cr> 

FILE CURRENT ATTRIBUTES 

: F : C R E D I T 



RENAMING AND DELETING FILES 

Occasionally you will have a file with a name that needs to be changed for some reason. For 
example, you could rename LIB86.86 to LIBRY.86 by using the RENAME command: 

-RENAME LIB86.86 TO LI BRY . 86<-c r> 

The RENAME command always expects to see the original name first, followed by a space, 
then the keyword TO, followed by another space, and finally the new name. Both names must 
be legal Series III filenames or pathnames. You cannot RENAME a file in one directory to a 
name with a different directory specifier— the new name must have the same directory 
specifier. 

If you actually renamed LIB86.86 to LIBRY.86, you should rename it back to LIB86.86, the name 
used for it in future examples. 

The DELETE command is very simple. Since there are no files in your system disk that you can 
delete, we'll use in this example a file that doesn't actually exist on your disk: 

-DELETE SAMPLE. TXT<cr> 
:FO:SAMPLE.TXT DELETED 

The DELETE command will irrevocably delete the file you specify. When you DELETE a file, 
you cannot retrieve it— it's gone. Use DELETE with caution. 
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To delete a file on a disk in a drive other than drive 1, simply use the appropriate pathname for 
the file. For example, suppose the file JUNK.TXT existed on the disk in drive 1. You would use 
this command to delete it: 

-DELETE :F1:JUNK.TXT<cr> 
:F1 : JUNK.TXT DELETED 

You can also delete many files at once. As you will see in Chapter 3, CREDIT creates a backup 
file with a ".BAK" extension for every file you edit. At some point (to utilize disk space), you 
might want to delete all of your backup files at once. For example, to delete all of the backup 
files on the disk in drive 1 , use the following command: 

-DELETE :F1 :*.BAK<cr> 

The asterisk (*) matches any name, and the ".BAK" extension matches only filenames with 
that extension. This "filename matching" technique is shown in more examples to come. 



COPYING FILES TO DISKS AND DEVICES 

The COPY command is useful for several operations: 

• To make a copy of a file 

• To send a copy of a file to another hard or flexible disk 

• To send a copy of a file to a device like a printer or a paper tape punch 

• To receive a file from a sending device like a paper tape reader 

• To copy all non-system files from one disk to another 

The COPY command is similar to the RENAME command. For example: 

-COPY : F1 :PR0G1 . SRC TO : F 1 : PR0G1 . B A K<c r> 
COPIED : F1 :PR061 .SRC TO : F1 : PR0G1 . BAK 

The COPY command expects to see the name of the source file or device (the source of the 
information to be copied, not to be confused with a source file of program source statements), 
followed by a space, then the keyword TO, followed by a space, and then the name of the out- 
put file or device (the destination of the copied information). After the output (or destination) 
file or device name, you can optionally specify a switch like "P" for pause, or "U" for update 
(these switches are explained in the Intellec Series III Microcomputer Development System 
Console Operating Instructions). 

More frequent uses of the COPY command are copying to devices, copying files onto other 
disks, and copying all the files in one disk to another disk. In all of these cases, you must 
specify the device or disk that is the source of the information, and the device or disk that will 
receive the copied information. For example, the RENAME program is in the directory for drive 
0. If you want to put a copy of it on the disk in drive 1 , you would type the following command: 

-COPY RENAME TO : F1 :<cr> 

COPIED :F0:RENAME TO :F1:RENAME 

When the source file is in the directory for drive 0, you don't have to specify :F0: for the file, 
because :F0: is the default directory if none is specified. When the destination is a disk in 
another drive, you have to specify the directory (in this case, :F1 :) for the destination file. 
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In the example above, the file RENAME was copied to the disk in drive 1 , and the drive 1 ver- 
sion has the same name. When you make copies of files for other disks, you will probably want 
the files on the other disks to have the same name. To keep the same name for the copy, 
specify only the destination directory without a new filename, as we did in the above example. 

To change the name for the copy, specify a different name with the destination directory. For 
example, if you want to use RNAM as the name of the new copy in drive 1 , use this command: 

-COPY RENAME TO :F1:RNAM<cr> 
:F0:RENAME COPIED TO :F1.:RNAM 

In the last two examples, the RENAME file was copied from drive to drive 1. To demonstrate 
another feature of the COPY command, we will first copy a file from drive 1 to drive (you 
should also try this example): 

-COPY : F1 :PR0G1 .SRC TO :F0:<cr> 

:F1 :PR0G1 .SRC COPIED TO : FO : PR0G1 . SRC 

Let's suppose that we used CREDIT (described in the next chapter) to modify the new copy of 
PROG1.SRC on the disk in drive (:F0:PROG1.SRC), and that we want to copy the newly- 
modified PROG1 .SRC to the disk in drive 1 . Since we already have a PROG1..SRC on the disk in 
drive 1, we might want to DELETE that one first, then COPY the newly-modified one to the disk 
in drive 1. However, let's suppose that we forgot to DELETE the old one first, or that we don't 
even know the old one exists on the disk in drive 1. We would type the following COPY com- 
mand: 

-COPY PR0G1.SRC TO :F1:<cr> 

:F1 :PR0G1 .SRC FILE ALREADY EXISTS 

DELETE? 

The COPY command found :F1:PROG1.SRC, and now it is asking us if we want to delete it in 
order to replace it with the newly-modifjed :F0:PROG1.SRC. We type a "Y" (or "y") to delete 
the old one and replace it with the new one, or type an "N" (or "n" or any other letter) to keep 
the old one and abort the copy operation. In this case, we want to replace the old 
:F1:PROG1.SRC with the newly-modified :F0:PROG1.SRC, so we type a "Y" followed by the 
RETURN key: 

DELETE?Y<c» 

: F0:PROG1 .SRC COPIED TO : F1 : PR0G1 . SRC 

By using this feature of the COPY command, you can selectively update existing files by typing 
"Y" (or "y") for the ones you want to update, and "N" (or "n") for the ones you don't want to 
update. 

To send a file to a device like a line printer or a paper tape punch, specify the device name as 
the destination device: 

-COPY PR0G1.SRC TO :LP:<cr> 
:F0:PROG1 .SRC COPIED TO :LP: 
-COPY PR0G1.SRC TO :HP:<cr> 
:F0:PROG1 .SRC COPIED TO :HP: 

The device name :LP: is the name of the line printer. The second example sends the file to the 
high-speed paper tape punch, whose device name is :HP:. For other device names, see the 
Intellec Series III Microcomputer Development System Console Operating Instructions . 
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The COPY command can also be used to copy several files at once, if you make use of wild 
card filenames. You can specify a wild card filename with the DELETE, RENAME, COPY, DIR, 
HDCOPY, and ATTRIB commands. A wild card filename matches a group of filenames in order 
to perform the action on several files at once. For example: 

-COPY *.* TO : F1 :<cr> 

This command copies all of the files in directory :F0: to directory :F1 :. 

NOTE 

To perform this example, you should insert a new disk into drive 1 and use the IDISK 
command (described in the next section in more detail) to prepare the new disk in 
drive 1 before copying all of the files in drive to it. 

The above example demonstrates use of the wild card filename "*.*". The first asterisk will 
match any number of characters in the name, and the second asterisk will match any three 
characters in the extension of the filename. 

You can also specify some of the characters of a filename in a wild card filename. For example, 
if you wanted to copy all of the files that have ".SRC" as an extension, you would use this 
COPY command: 

-COPY * . SRC TO : F1 : <cr> 

There are other wild card filenames that are described in detail in the Intellec Series III 
Microcomputer Development System Console Operating Instructions. 

There are several ways to copy entire disks. The IDISK and FORMAT commands are used to 
prepare ("format") disks for use in the Series III system. The IDISK command will simply for- 
mat the disk as a system or non-system disk, copying over to the new disk only the format 
("F") files that are needed to format the new disk as a system or non-system disk. 

The FORMAT command will format a new disk as a system or non-system disk depending on 
the source disk implied (drive 0) or specified (using FROM). The FORMAT command will also 
copy certain files from the source disk. FORMAT with the "S" switch copies all files from the 
source drive that have the "S" (system) attribute. See the previous section on formatting disks 
for an example of the FORMAT command with the "S" switch. 

To copy all of the files from the source disk, use the "A" switch. To show an example of the 
FORMAT command with the "A" switch, insert another blank disk into drive 1, and type this 
command: 

-FORMAT : F1 :SYSTEM.BAK A<cr> 
SYSTEM DISK 



In this example, the FORMAT command formats the disk in drive 1 as a system disk because 
the source disk in drive is a system disk. The new disk is called SYSTEM. BAK. The "A" 
switch specified that all files from the source disk in drive should be copied to SYSTEM. BAK 
in drivel. 

So far, all of the FORMAT examples used the disk in drive as the source disk. If, for example, 
you have more disk drives and you want to FORMAT a disk in drive 1 using as a source a disk in 
drive 2, you would specify FROM 2 as in the following example: 



•FORMAT :F1:MYDISK A FROM 2<cr> 
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In a previous section on formatting disks, we described formatting operations to prepare your 
disks in a way that conforms with our examples. We do not necessarily recommend this for- 
matting scheme for your particular configuration. Chapter 2 of the Intellec Series III Micro- 
computer Development System Console Operating Instructions gives you the specific details 
for setting up disks in any Series III configuration, using the IDISK, FORMAT, and HDCOPY 
commands. 



EXECUTING COMMANDS AND PROGRAMS 

The Series III has two processors: the 8085 (8-bit processor), and the 8086 (16-bit processor). 
You can execute 8085-based programs in the 8085 environment (which is called the 8085 execu- 
tion mode or "8085 side"), and execute 8086-based (or 8088-based) programs in the 8086 
environment (which is called the 8086 execution mode or "8086 side"). When you type the 
filename of a program as a command (as you have been doing when you type "DIR" or 
"COPY"), you are executing the program in the 8085 execution mode. In order to execute a 
program or command in the 8086 execution mode, you must prefix the command RUN to the 
program or command you wish to execute. For example, if you want to execute LIB86.86, the 
8086 librarian (which can only be run in the 8086 execution mode), you would type the following: 

-RUN LIB86<cr> 

You should notice two things that are different: the use of the command RUN, and the fact that 
you do not have to supply the ".86" extension for LIB86.86 when you RUN it. 

The RUN command is actually a program supplied on the system disk that activates the 8086 
execution mode. When you supply a filename with no extension, the RUN command 
automatically attaches the ".86" extension to the name you supplied, and looks for the file by 
that name (i.e., the name with the ".86" extension). This is a protection feature you can use for 
your 8085 and 8086 programs: you can use the same name for both, with an ".86" extension for 
the 8086 program and no extension for the 8085 program. When you specify filenames without 
extensions, RUN only looks for files that are supposed to run in the 8086 execution mode; i.e., 
files with the ".86" extension. This protection feature assumes that you would put the ".86" 
extension on files that are meant to run in the 8086 execution mode. 

If you actually executed LIB86.86, the following would appear on your screen: 

-RUN LIB86<cr> 

SERIES III 8086 LIBRARIAN, Vx.y 

* 

The LIB86.86 program is now in control. To leave this program and return to the operating 
system, use the librarian's EXIT command: 

*EXIT<cr> 

You can, of course, supply an extension with the filename you supply to the RUN command, 
and the RUN command would not supply the ".86" extension. For example, if you have an 8086 
program called MYPROG.PRG and you want to run it in the 8086 execution mode (on the "8086 
side"), you would type the following: 

-RUN MYPR06.PRG<cr> 
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You can also RUN a program whose filename has no extension. However, you must supply a 
period to show that there should be no extension (i.e., to keep RUN from supplying the ".86" 
extension). The following is an example, assuming that the name of the program is not 
MYPROG.PRG but is MYPROG: 

-RUN MYPROG. <cr> 

When you use RUN as a command (as in the examples above), the 8086 execution mode is 
turned on for program execution, and when the program terminates, the 8086 execution mode 
also terminates, returning you to the 8085 execution mode. The 8085 execution mode is con- 
trolled by ISIS-II, which signifies its control by displaying the dash (-) prompt. You can, 
however, use RUN as a program and stay in the 8086 execution mode. 

To use RUN as a program, simply type RUN: 

-RUN<cr> 

ISIS-II RUN 8086, Mx.y 

> 

The RUN program displays a sign-on message and its own prompt, the right angle (>) bracket, 
to signify that the RUN program is now in control. This mode is calledthe interactive 8086 
mode, and you use it to execute more than one program. When you get the angle (>) prompt, 
you can type the filename of a program in order to execute the program. The rule stated above 
about the use of the ".86" extension still applies. 

The following example shows the execution of several 8086-based programs: PASC86.86 (the 
Pascal-86 compiler), LINK86.86 (the linker and binder), and PROG1.86 (the assembled, linked, 
and bound program). If your Pascal-86 disk (containing the compiler, run-time libraries, and 
sample PROG1.SRC) is in drive 1, and LINK86.86 is on the disk in drive 0, you can type this 
example exactly as presented. The LINK86.86 command line shows use of the '^"continua- 
tion character that allows you to type commands over several lines without executing them. 
The EXIT command turns off the 8086 execution mode and returns you to ISIS-II and the 8085 
execution mode: 

-RUN<cr> 

ISIS-II RUN 8086, V1 .0 

>:F1:PASC86 : F1 : PR0G1 . SRC <c r> 

This executes PASC86.86 to compile 
PROG1 . SRC , both of which are on the 
disk in drive 1. The Pascal-86 
compiler displays some i n format i on. 

>LINK86 :F1:PROG1.OBJ,:F1:P86RN0.LIB,:F1:P86RN1.LIB,&<cr> 
>>:F1:P86RN2.LIB,:F1:P86RN3.LIB,:F1:E80 87.LIB,&<cr> 
>>: F1 :E8087, : F1 : LARGE. LIB TO :F1:PR0G1.86 BIND<cr> 

This example shows use of the ''&'' 
command line continuation character. 
The entire command links the object 
program with the run- time libraries, 
and binds the linked module to form 
an executable program called 
PR0G1.86 
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> : F1 : PR0G1 <c r> This command executes : F1 : PR0G1 .86 

Farenheit temperature i.s:72<cr> 

PR0G1 . 86 is a temperature conversion 
program. Hhen it asks for more 
input, you can stop the program by 
typing ' 'N ' ' . 

Another temperature input? :N<cr> 

>EXIT<cr> This termi nates the 8086 execution 

mode and returns you to the 8085 
execut ion mode . 



In the above examples, commands and programs were executed directly by typing the com- 
mand name or program name (sometimes followed by the name of a file to be acted upon by 
the command or program; this is called an actual parameter). When you execute a program or 
command directly, it is called interactive execu tion. 

In many cases you will want to submit a batch of commands or programs to be executed in a 
sequence. The SUBMIT command allows you to submit a file of commands as a job to be 
handled by the system without any interaction on your part. This is called non-interactive 
execution. 

You use SUBMIT by first providing a file of commands to be executed— a command sequence 
definition file, which has the extension ".CSD". This file can contain operating system com- 
mands, parameters for the commands, and comments—any line starting with a semicolon (;■), 
or any text following a semicolon, is a comment, not an executable command. In the following 
example, note that the first command is the RUN command, which starts the 8086 execution 
mode, and that blank spaces in command lines are allowed to improve readability: 



CSD file to SUBMIT for Linking a Pascal-86 object module 
to run -time support libraries (with E8087 emulator) 

Parameter =:fn:myprog 

Parameter 1 = drive containing run-time libraries 



RUN 
LINK86 



EXIT 



%0.0BJ, & 
F%1 :P86RN0 
P86RN1 
P86RN2 
P86RN3 
E8087. 



F%1 
F%1 
FX1. 
FX1 
F%1 
F%1 



.LIB, 
.LIB, 
.LIB, 
. LIB, 
LIB, 



E8087, & 
LARGE. LIB 



TO %0.86 BIND 



Returns to 8085 execution mode. 
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When this file, called LNKBND.CSD, is submitted, the system will execute the RUN command, 
then the LINK86.86 program (the 8086 linker), and finally the EXIT command to leave the "8086 
side" and return to the 8085 execution mode. 

The percent symbols (%) indicate the use of formal parameters. When you execute the 
SUBMIT command, you supply actual parameters for each of these formal parameters. The 
following is an example: 

-SUBMIT LNKBND( : F1 :PR0G1 ,1 )<cr> 

The SUBMIT command first looks for LNKBND.CSD (it supplies the missing ".CSD" exten- 
sion), and then it substitutes the first actual parameter (:F1 :PR061) for "%0" and the 
second actual parameter (1 ) for "%1". The resulting command sequence is as follows: 



RUN 
LINK86 



F1 :PR0G1 .OBJ , & 

F1 :P86RN0. LIB, & 

F1 :P86RN1 . LIB, & 

F1 :P86RN2. LIB, & 

F1 :P86RN3. LIB, & 

F1 :E8087. LIB, & 

F1:E8087, & 

M:LARGE.LIB TO :F1:PR0G1.86 BIND 



EXIT 



The SUBMIT program creates another file with a ".CS" extension to hold the resulting com- 
mand sequence. You should not modify this file. 

SUMMARY OF THE SERIES III OPERATING SYSTEM 

The Series III system has two execution environments: the 8085 environment (the "8085 side") 
where the ISIS-II commands and 8080/8085 programs run, and the 8086 environment (the "8086 
side"), activated by the RUN program, where 8086 and 8088 programs run. Programs that run in 
the "8086 side" usually have an ".86" extension in their filenames. The RUN program actually 
looks for an ".86" extension if you specify a filename without an extension. 

You use the Series III operating system and its tools to develop software, but there is another 
way to use it: your software products can use it as an execution vehicle. The Intellec Series III 
Programmer's Reference Manual describes the "innards" of the Series III operating system 
and how your programs can make use of sections of the system. By using PL/M or assembly 
language, you can call operating system procedures directly (as described in the summary of 
Chapter 5) from your program. Pascal-86 programs automatically use the operating system pro- 
cedures by using run-time libraries which interface between the Pascal-86 programs and the 
Series III system. 

The Series III system has a standard set of procedures that your software products can use; by 
using this standard programming interface, you can be sure that your future programs will 
remain compatible with present and future Intel operating systems. 

There are a few more commands that were not introduced because they are used infrequently, 
or they are easy to use. These commands are adequately introduced in the Intellec Series III 
Microcomputer Development System Console Operating Instructions. You should consult this 
manual anyway, to be aware of details not mentioned in this tutorial. 
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"A good workman is known by his tools." —proverb 



You use a text editing program to create any kind of document, including a document that con- 
sists of program instructions. CREDIT is a text editor that takes advantage of the capabilities 
you have with CRT screens to: 

Display and scroll text on the screen 

Rewrite text by typing new letters over old ones 

Rearrange lines of text and insert new lines of text between old lines 

Move to any position in the text file or to any point on the screen instantly 

Correct typing mistakes easily as you type 



To simplify everyday text editing operations, CREDIT also provides features that allow you to: 

• Save both the newly edited version and the old unedited version of the same document 

• Find any string of characters and substitute another string of characters automatically 

• Copy sections of a document to use in another document 

• Create macros to execute several commands at once, or to repeat sets of commands 
(command iteration) 



CREDIT is useful for all documents; for example, we used CREDIT to write this book. CREDIT is 
more often used to write the Pascal statements, PL/M statements, and assembly language 
instructions that comprise program modules. Text files created by CREDIT are called 
documents if they are meant to be read by humans; and they are also called source programs if 
they consist of program statements (Pascal, PL/M, or FORTRAN statements, or assembly 
language instructions) that are read by compilers or assemblers in order to be compiled or 
assembled into working programs. 



In the following examples, we show you how to create and edit a text file consisting of English 
sentences that you can translate (eventually) into Pascal-86 statements. As described in 
Chapter 1, this step of generating Pidgin Pascal (English sentences describing a Pascal pro- 
gram) is a very important one in program development, because the program logic expressed 
in English sentences closely resembles human thinking and is therefore easier to debug. 
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CREATING A TEXT FILE AND INSERTING TEXT 

When you run CREDIT, you also specify the name of a file to be edited. If CREDIT can find the 
file you are specifying, it will open the file for editing. If CREDIT cannot find the file you are 
specifying, it will create a new file by that name. 

For example, let's create a file called PIDGIN.TXT in the directory for drive 0. To create and edit 
PIDGIN.TXT, type the following command: 

-CREDIT PIDGIN. TXT<cr> 

CREDIT responds with: 

ISIS-II CRT-BASED TEXT EDITOR V2.0 
NEW FILE 1982 FREE DISK BLOCKS 

The number of free disk blocks depends on the number of files on your disk and the size of 
your disk— you do not have to worry about it unless you get a "DISK FULL" warning. If you get 
such a warning, terminate your CREDIT session by typing "EX" (followed by RETURN), and 
specify another disk (like :F1 :) for your text file. 

The screen is partitioned into two areas, as shown in figure 3-1 . 

Notice the vertical line " | " in the text area? This symbol marks the end of the text in the file. 
Since the file is new and holds no text yet, this symbol appears at the beginning of the file. As 
you type text into the file, the symbol moves and continues to mark the end of the text. 

The blinking cursor sits underneath this vertical line. You can immediately type text into the 
file: 

just type ! | 

As you type, you can make changes to the text you already typed by moving the cursor back to 
the previous text and typing over it. Move the cursor by using the cursor control keys that sur- 
round the HOME key (do not use the HOME key yet!). If you inadvertantly typed the HOME key, 
hold down the CNTL key and type a V (Control-V) to return the cursor to the text body. 



COMMAND AREA 



Figure 3-1. The CREDIT™ Video Display 



121632-4 
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You end each line of text with a carriage return by typing the RETURN key, just like a 
typewriter. CREDIT displays the carriage return operation as an uparrow (t). The carriage 
return operation is actually performed by two ASCII codes: one for the carriage return 
character, and one for the line feed character. CREDIT uses one symbol, the uparrow (t), for 
both characters. This symbol is called the line terminator. 

There are several keys used often in editing: 

• The RPT (Repeat) repeats whatever key you hold down. For example, hold down both the 
RPT key and a cursor movement key, and the cursor will move faster. Use the RPT key 
with RUBOUT to erase a line. 

• The TPWR (Typewriter) key, when in the down position, displays every character in lower 
case like a typewriter. When in the up position, all characters are in upper case. 

• The ESC (Escape) key will cause a break in an executing command. 

If your keyboard seems to freeze and does not display characters, you probably moved the 
cursor past the vertical line. You cannot type any characters after the vertical line, since the 
vertical line marks the end of the text. You can move the cursor to the vertical line and type, 
thereby moving the vertical line, or you can move the cursor to any position before the vertical 
line and type over the previously typed characters. 

The ISIS-II CREDIT (CRT-Based Text Editor) User's Guide contains an interesting tutorial ses- 
sion. Before you learn how to use some of CREDIT'S powerful editing commands, you should 
learn how to end a CREDIT session properly, without losing the edits you have made. Figure 
3-1 shows the layout of the screen; in the Command Area you'll find an asterisk. To move the 
cursor to this asterisk, press the HOME key. 



rlllllllllll^ 



v*v 



REPEAT 
(RPT) 



HOME 



TYPEWRITER 
MODE 
(TPWR) 



Figure 3-2. The Series III Keyboard 



121632-5 
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When the cursor appears after the asterisk, you can type a CREDIT command. The EX (exit) 
command terminates a CREDIT session properly. Type "EX", followed by RETURN: 

*EX<cr> 

CREDIT will clear the screen and display the following message: 
EDITED TO :FO:PIDGIN.TXT 

By using the DIR command, you can see that the directory listing for :F0: now contains a new 
filecalledPIDGIN.TXT. 

You can use CREDIT to edit PIDGIN.TXT by invoking CREDIT again: 
-CREDIT PIDGIN. TXT<cr> 

This time, CREDIT does not have to create the file, because it already exists in the directory for 
the disk in drive 0. CREDIT responds with: 

ISIS-II CRT-BASED TEXT EDITOR V2.0 

OLD FILE SIZE=2 1980 FREE DISK BLOCKS 

The text you typed during the last example appears under this message. The message tells 
you that PIDGIN.TXT is an old file, its size is 2 blocks (a block is 128 bytes), and you have 1980 
free disk blocks in which to expand the file (these numbers vary depending on the space taken 
up by files on your disk). If you do not have enough free disk blocks to expand the file, CREDIT 
displays a warning message. 

You can continue to experiment with CREDIT by typing and retyping lines of text. When you 
are finished typing extraneous characters and are ready to type meaningful English 
sentences, move the cursor to the first character or screen position, and type CNTL and Z 
(hold down the CNTL key and type Z). The @ symbol will replace the character. Now move the 
cursor to the end of the text— to the vertical line— and type CNTL and Z together again. ZAP! 
You just deleted all the text you typed. All of the characters between the two @ symbols were 
deleted, and you are left with an empty text file again. 

Let's start with the simple problem definition. Type the following sentence: 

Maintain the climate of a- 'building using a system comprised oft 

heating and cooling methods.t 

t 

NOTE 

The uparrow (t) stands for the RETURN key. Use the RETURN key to end each line of 
text, including blank lines. 

Using CREDIT, you can type the sentences you know you need, and insert more sentences 
later. For example, you know you need the following sentences: 

Based on temperature data, see if there is a demand, t 

and determine the type of demand. t 

If there is no demand, simply continue operating the climate system. t 

If there is a demand for heat, determine the heating method, t 

and operate the system with this method. t 

If there is a demand for cold, determine the cooling method, t 

and operate the system with this method. t 
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Two questions should Immediately come to mind: what information does the program need, 
and what else would a climate control program do? Let's add new sentences by using 
CREDIT'S insert capability. Here is our text file so far: 

Maintain the climate of a building using a system comprised oft 

heating and cooling methods.t 

t 

Based on temperature data, see if there is a demand, t 

and determine the type of demand. t 

If there is no demand, simply continue operating the climate system. t 

If there is a demand for heat, determine the heating method, t 

and operate the system with this method. t 
If there is a demand for cold, determine the cooling method, t 

and operate the system with this method.t 
t 

Move the cursor to the beginning of the fourth line of text (the line that begins with 
"Based on ..."). Hold down the CNTL key and type A (CNTL-A). The rest of the text disap- 
pears, and you are now able to type sentences. Type the following sentences and blank lines: 

t 

Startup the climate system. t 

t 

While the system is operating, do (and repeat) the following :t 

t 

Get the data needed for each pass: the time, the t emperat ures , t 

the weather, the state of the solar collector, etc.t 

Store this data . t 

t 

Now type CNTL and A together again. The rest of the text file reappears with the new lines 
inserted in their proper places. By typing CNTL and A together, you turn on the Add Text 
Mode; by typing them again, you turn off Add Text mode. Here is your text file with the newly 
inserted lines: 

Maintain the climate of a building using a system comprised oft 

heating and cooling methods.t 

t 

Startup the climate system. t 

t 

While the system is operating, do (and repeat) the followingit 

t 

Get the data needed for each pass: the time, the t emperat ures , t 

the weather, the state of the solar collector, etc.t 

Store this data . t 

t 

Based on temperature data, see if there is a demand, t 

and determine the type of demand. t 

If there is no demand, simply continue operating the climate system. t 

If there is a demand for heat, determine the heating me thod,t 

and operate the system with this method.t 
If there is a demand for cold, determine the cooling method, t 

and operate the system with this method.t 
t 
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MOVING AROUND IN THE TEXT FILE 

Using the cursor movement keys, you can move the cursor anywhere within a screenful of 
text. If the text file is larger than twenty lines, it will not fit entirely in one screen— you have to 
scroll the screen by using the scrolling commands. 

The scrolling commands only operate when the cursor is in the text area (when the cursor is in 
the text area, you are in screen mode). Refer to figure 3-1 for an illustration of the text and com- 
mand areas. When the cursor is in the command area {command mode), you can only execute 
command mode commands; to move into screen mode (and move the cursor to the text area), 
type CNTL-V (hold down the CNTL key and type V). 

The scrolling commands are CNTL-N (to see the next screenful of text), and CNTL-P (to see 
the previous screenful of text). You can also use CNTL-V to see which character CREDIT is cur- 
rently pointing to, and to move into screen mode. If you experiment with CNTL-V, you will 
notice that the first use of CNTL-V moves the cursor to the character that CREDIT'S pointer is 
pointing to (more on this pointer in the next paragraph). Subsequent executions of CNTL-V 
rearrange the lines of text so that the line that contains the character pointed to by CREDIT 
becomes the third line in a screenful of text. This is very useful for partial scrolling. You can 
use these commands without fear, since they do not modify the text. 

NOTE 

The CNTL key, when used with another key (e.g., CNTL-V), is sometimes 
represented by the uparrow (t) symbol in our manuals and pocket references. For 
example, CNTL-V is shown as tV, and CNTL-A is shown as tA. 

The character pointer mentioned above is a reference point for all of CREDIT'S commands. In 
screen mode, the cursor represents the pointer. It is sometimes called "the CP". Most text 
editors have some pointer or marker that points to a place in the file, and commands that insert 
characters, delete characters, or search for characters use this pointer to find the place in the 
file to perform their operations. CREDIT'S pointer points to a single character, and this pointer 
moves whenever you move the cursor within the text area. When you type the HOME key and 
move the cursor to the command area, the pointer stays where it is, pointing to the character in 
the text area. The CNTL-V command moves the cursor back to the text area and back to the 
character pointed to. 

In screen mode, the cursor movement keys and the scrolling commands move this pointer. In 
command mode, all editing changes are made relative to the position of this pointer. Deleting a 
single character, for example, erases the character pointed to by the pointer, and moves the 
pointer to the next character. When you insert text, the text is inserted preceding this pointer. 
Many other commands also move this pointer. CNTL-V will always move the cursor to the 
character pointed to by this pointer. 

One command that always moves the pointer is the J (jump) command. You can only use the J 
command in command mode, and the J command leaves you in command mode (so you have 
to do another CNTL-V to get into screen mode). You can jump to any location relative to the 
pointer, or you can jump to specific locations cal led tags. You can set your own tags by using 
the TS (tag set) command, and delete tags by using the TD (tag delete) command. There are 
two permanent tags that need not be set, and that cannot be deleted: the beginning of the file, 
known as TT (tag for top), and the end of the file, known as TE (tag for end). For example: 

*JTT<cr> 

This command moves the pointer to the top of the text file (the beginning of the first line). 
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Since CREDIT usually puts the pointer at the top of the file when you start an editing session, 
the JTT command (jump to tag for top of file) is more useful during an edit session. The JTE 
command (jump to tag for end of file) is useful at any time: 

*JTE<cr> 

After using the J command, you are still left in command mode. Use the CNTL-V command to 
return to screen mode, and to return the cursor to the character pointed to by the CP. 

Use the JTE command (jump to tag for end of file), followed by a CNTL-V command to return to 
screen mode, in order to add a sentence to the end of our Pidgin Pascal software definition. 
The following example shows the execution of the JTE command, followed by a CNTL-V 
(displayed as tV), followed by a display of the current text file with the added sentence at the 
end: 

*JTE<cr> 
*t V 



Maintain the climate of a building using a system comprised oft 

heating and cooling methods. f 

t 

Startup the climate system. t 

t 

While the system is operating, do (and repeat) the following:t 

t 

Get the data needed for each pass: the time, the temperatures , t 

the weather, the state of the solar collector, etc.t 

Store this data .T 

t 

Based on temperature data, see if there is a demand, t 

and determine the type of demand.t 

If there is no demand, simply continue operating the climate system. t 

If there is a demand for heat, determine the heating method, t 

and operate the system with this method. t 
If there is a demand for cold, determine the cooling method, t 

and operate the system with this method. t 
t 

If no method is possible (abnormal conditions),* 
shut down the climate system. t 
t 



FINDING OLD TEXT AND SUBSTITUTING NEW TEXT 

There will be numerous occasions when you will want to find a specific word or group of 
words, and move the character pointer at the same time. There will also be times when you will 
want to substitute a new word or group of words for an old one. For example, you might write a 
program that displays the name of your product (for example, "ACME Solar Controller") in 
several different places. Sometime later, you find out that the marketing people changed the 
name to "ACME Climate Controller". With one simple CREDIT command, you could substitute 
the new word ("Climate") for the old word ("Solar") wherever the old word occurs in the text 
file. You would only have to make sure that you specified the old name using upper and lower 
case characters as they appear in the file, and that the new name looks exactly as it should 
look. 
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The F (Find) command finds any string (group of characters) you specify. The S (Substitute) 
command finds the old string you specify and substitutes the new string you specify, and rear- 
ranges the text so that spaces aren't introduced into the file. The SQ (Substitute after Query) 
command finds the old string you specify, then asks you for a yes-or-no answer: a yes tells 
CREDIT to substitute the new string you specified, and a no tells CREDIT not to substitute the 
new string. If you executed the SQ command iteratively (see next section), CREDIT would con- 
tinue looking for more instances of the old string. 

To show examples of these commands, we'll return to our Pidgin Pascal text file to add some 
new text and substitute a new word for an old one. Use the F command to find the string 
"simply continue": 

*F/s imp ly con.t i nue/<c r> 

When the F command finishes, it displays the asterisk once again. To see where it put the 
character pointer, type CNTL-V. The cursor should be under the space after the last letter of 
"continue." We want to rewrite the sentence so that "no method" is one of the methods used 
to operate the climate system. 

At this point, it is easy to move the cursor to the appropriate place to insert new text. You can 
type over the old text, and use the RETURN key to continue typing a line. You can also use the 
GNTL-A combination to insert a lot of text. After inserting the new text, the sentences should 
read as follows: 

If there is no demand, choose '"no method' ' as the method, t 

and operate the system with this method.t 
If there is a demand for heat, determine the heating method, t 

and operate the system with this method.t 
If there is a demand for cold, determine the cooling method, t 

and operate the system with this method.t 
t 

If no method is possible (abnormal condi t i ons) , t 
shut down the climate system. t 

To illustrate use of the S and SQ commands, we will substitute the word "request" for 
"demand" throughout our text file (and thereby make our program more polite). First, use the 
JTT command to move the character pointer to the beginning of the file; then use the S com- 
mand in the following manner: 

*JTT<cr> 

*S /demand/ request /<c r> 

The S command found the first instance of "demand" and substituted "request" for it. Check 
to see the result by typing CNTL-V: 

Based on temperature data, see if there is a request, t 
and determine the type of demand. t 

Note that S command only found the first instance of "demand" and substituted "request" for 
it only. Note also that the S command must have moved the comma after the first "demand" in 
order to fit the word "request" in that place. 
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To execute the S or SQ commands repeatedly, you would use a form of command iteration. 
The SQ command performs the same operation as the S command if you answer with a yes; on 
a no answer, the SQ command does not substitute text. Here is an example of the SQ com- 
mand, with a sneak preview of the easiest form of command iteration: 

* ! <SQ /demand/ request /><cr> 

The angle brackets around the entire SQ command, in conjunction with the exclamation point, 
cause the SQ command to be executed repeatedly until the command reaches the end of the 
text file. Do not be confused by the angle brackets surrounding the "cr"— that is the symbol 
depicting use of the RETURN key. Angle brackets delimit the command to be executed 
iteratively, and the exclamation point replaces a number that would specify the number of 
iterative executions. This is explained in more detail in the next section. 

The SQ command displays the line that contains the old text, and then displays a question 
mark. You must respond with a "Y" for yes, or an "N" for no: 

and determine the type of demand. t 
?Y 

You do not have to type RETURN after typing the "Y" or "N", because CREDIT is expecting 
such an answer. The SQ command goes on to find more instances of "demand": 

If there is no demand, choose ' 'no method' ' as the method, t 

?Y 

If there is a demand for heat, determine the heating method, t 

?Y 

If there is a demand for cold, determine the cooling method, t 

?Y 



When the SQ command has found the end of the text file, the condition for iterative execution 
is satisfied, and the execution ends. Type CNTL-V, followed by a CNTL-P, to see the previous 
page and the substitutions: 

Maintain the climate of a building using a system comprised oft 

heating and cooling methods.t 

t 

Startup the climate system. t 

t 

While the system is operating, do (and repeat) the following:t 

t 

Get the data needed for each pass: the time, the temperatures , t 

the weather, the state of the solar collector, etc.t 

Store this data.t 

t 

Based on temperature data, see if there is a request, t 

and determine the type of request. t 

If there is no request, choose ''no method'' as the method, t 

and operate the system with this method.t 
If there is a request for heat, determine the heating method, t 

and operate the system with this method.t 
If there is a request for cold, determine the cooling method, t 

and operate the system with this method.t 
t 

If no method is possible (abnormal condi t i ons) , t 
shut down the climate syst em. t 
t 
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MACROS AND COMMAND ITERATION 

Our Pidgin Pascal program still needs a modification that will vastly improve its readability. We 
need to indent al) of the sentences that occur after the sentence "While the system is 
operating, do (and repeat) the following:". This will improve the readability, since it will then 
be obvious that the indented sentences are the actions that have to be repeated. 

To make this improvement, we will define a macro to hold several editing commands that will 
be executed iteratively. Rather than explain the process of defining macros and the syntax for 
command iteration, we'll show you the steps to take to make this improvement to our text file, 
and then we'll explain them. 

To begin, move the cursor (in screen mode, so that it also moves the character pointer) to the 
beginning of the blank line that follows the sentence "While the system is operating...". Your 
cursor (and the character pointer) should now be at the beginning of this blank line, as shown 
by the underscore "_" symbol: 

Maintain the climate of a building using a system comprised oft 

heating and cooling methods. t 

t . " 

Startup the climate system. t 

t 

While the system is operating, do (and repeat) the followingit 

Now type the HOME key to return to command mode. 

You can only define macros while in command mode. We will now define a macro called X that 
will make the improvement. Here is our definition of X: 

*MSXaLQ;%<L; I/DDDDD/;P>a<cr> 

Type this macro definition exactly as it is shown above (the "□" symbol stands for a 
space— type five spaces— and the "<cr>" stands for the RETURN key). When CREDIT finishes 
digesting this definition, it displays the asterisk again. Now type the following command: 

*MFX(13Xcr> 

You will see each line following the sentence "While the system is operating..." being acted 
upon by macro X. All of the lines following that sentence are now indented by five spaces, as 
shown below: 

Maintain. the climate of a building using a system comprised oft 

heating and cooling me thods.t 

t 

Startup the climate syst em. t 

t 

While the system is operating, do (and repeat) the followingit 

t 

Get the data needed for each pass: the time, the t emperatures , t 

the weather, the state of the solar collector, etc.t 

Store this data.t 

t 

Based on temperature data, see if there is a request, t 

and determine the type of request. t 

If there is no request, choose ''no method 1 ' as the method, t 
and operate the system with this method.t 
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If there is a request for heat, determine the heating method, t 

and operate the system with this method. t 

If there is a request for cold, determine the cooling method, t 

and operate the system with this method. t 
t 
If no method is possible (abnormal condi t i ons) , t 

shut down the climate system. t 
t 

"What was that gibberish I typed?" To answer your question, display the macro definition 
again by typing the following command in command mode: 

*?M<cr> 

XL0;%<L; 1/ /;P> 

The display is exactly what you typed before, without the "@" symbols. The "@" symbols 
were used to define the macro— they delimit the actual text of the macro, so they are not 
necessary in this display (therefore CREDIT does not display them). 

The macro starts with its name: X. Following the name is the first command in the macro: the 
LO command, which moves the character pointer (called CP from now on) to the beginning of 
the current line (the line that the CP is currently sitting on— this line changes every time the 
entire macro executes). Following the LO command is a semicolon, which separates one 
command from the next. 

The next command in macro X is a set of commands to be executed repeatedly, or iteratively. 
The "%" (percent) symbol is a special one in this case, and is explained in the next paragraph. 
You saw the angle brackets in the last section— they delimit the set of commands to be 
executed repeatedly. The commands to be executed repeatedly are the L command (move CP 
to the beginning of the next line), the I command (insert the text that is specified within the 
following "/" (slash) symbols), and the P command (display the current line). The text within 
the "/" (slash) symbols consists of the five spaces we need to insert in order to indent the 
lines. 

Now we'll explain the "%" (percent) symbol. When you typed the command to execute macro 
X, you typed: 

*MFX(13Xcr> 

The "MF" command executes the macro "X". The number 13 in parentheses is called a 
parameter— the MF command substitutes the parameter you specify (in this case, 13) for the 
"%" (percent) symbol. The result is that the iterative command set ("<L;I/ /;P>") is 
executed 13 times. Why did we pick 13? Because there were only 13 lines ahead of the 
character pointer to be indented. We could have specified a "!" (exclamation point) symbol to 
execute the iterative command set over and over until it reached the end of the file, but we 
chose this method to show you the use of parameters in macros, and to make sure that the last 
two lines would not be indented. 

We also chose to use the "@" symbol to delimit the entire macro, but you can use any symbol 
that is not used within the macro. 

Obviously, there are more details you should learn before using macros and other advanced 
editing features. However, you do not need these features to perform simple editing opera- 
tions. They exist only to make your text editing sessions easier, if you first learn how to use 
them. 



37 



Chapter 3 



ENDING A TEXT EDITING SESSION AND MANAGING 
BACKUP FILES 

When you are editing text, the edited text is in the computer's memory, but it is not yet on disk. 
To update the text file with the edited text, you have to end your text editing session properly. 
The EX command properly replaces the old text in the file with the newly edited text, and it also 
saves the old version of the file in another file called a backup file. When the edit session ends, 
control of the system returns to the operating system (ISIS-II). 

If you have been following the examples in this chapter, you are now in CREDIT with your 
edited text, and you are ready to end your edit session. If you are not in command mode (with 
the asterisk prompt), use the HOME key to get into command mode. When you are in com- 
mand mode, type the following command: 

*EX<cr> 

The text on the screen should disappear, and another message should appear: 

EDITED TO :FO:PIDGIN.TXT 

The file PIDGIN.TXT, on the disk in drive 0, now contains the newly edited text. Use the DIR 
command to see the directory for drive 0. In the directory listing, you should see the filename 
PIDGIN. BAK. CREDIT created this file to be the backup file that contains the old unedited ver- 
sion of PIDGIN.TXT. Every time you use the EX command by itself, CREDIT automatically 
creates a backup file with the ".BAK" extension to contain the previous version of the file. 

NOTE 

You should not execute CREDIT to edit a backup file (a file with the ".BAK" exten- 
sion), because the EX command would first put the new edits into the ".BAK" file, 
then it would overwrite the ".BAK" file with the previous (unedited) version of it. Use 
the REN (rename) command to rename the file before editing it, or use the filename 
option with the EX command, described in the next paragraph. 

You can optionally specify a filename with the EX command, so that the newly edited text 
becomes a new text file, and the old text file remains unedited. For example, if you had typed 
the following version of the EX command (rather than the preceding version): 

*EX NEW.TXT<cr> 

the following message would appear: 

EDITED TO :F0:NEW.TXT 

The file NEW.TXT would contain the newly edited text, and the old PIDGINJXT would not have 
been updated (and PIDGIN. BAK would not have been created as a backup file). 

NOTE 

If you type "EXIT" rather than "EX", CREDIT assumes that you want to store the 
newly edited text in the file IT (:F0:IT). 

Another way to end an edit session is to use the EQ (quit) command. The EQ command will 
keep all files unchanged, as if nothing had happened. All edits you made while in the edit ses- 
sion vanish, and the text and backup files (if they exist) remain unchanged. If you use the EQ 
command in a session that created the text file, the new text file would not exist. 
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To keep you from making a mistake, the EQ command will first ask you for a Y or N answer 
before it ends the session: 

*EQ<cr> 
QUIT7Y 

If you reply with anything other than a "Y" or "y", the EQ does not end the edit session. 

DISPLAYING AND PRINTING TEXT FILES 

Now that you have a text file, we can show you how to display the file on your screen and copy 
the file to a printing device. You can display the text file on your screen without using CREDIT 
by using the COPY command and the device name :CO: (for "console output"): 

-COPY PIDGIN.TXT TO :C0:<cr> 

To print the text file PIDGIN.TXT, you use the COPY command to copy the file to the device 
name :LP: (for "line printer"), or to the device name :TO: (for "teletype output"). You can 
COPY a file to any output device. You can find a complete list of device names in the Intellec 
Series III Microcomputer Development System Console Operating Instructions. This example 
assumes that you have an :LP: device to receive a copy of the file :FO:PIDGIN.TXT: 

-COPY PIDGIN.TXT TO :LP:<cr> 

FROM TEXT TO PROGRAM 

Your PIDGIN.TXT text file now contains an algorithm that is actually a program in disguise (the 
disguise is English, or Pidgin Pascal). You should keep a copy of it somewhere, perhaps on 
another disk (or leave it in drive if you have a hard disk subsystem). To use this algorithm in 
the next chapter, you will want to copy the text file to the Pascal-86 disk, and call it MAIN. SRC, 
since it will become the source file of your main control algorithm: 

-COPY PIDGIN.TXT TO : F 1 : MA I N . S R C <c r> 
:FO:PIDGIN.TXT COPIED TO :F1:MAIN.SRC 

The examples in this and subsequent chapters assume that you either have a hard disk sub- 
system, or at least two double-density flexible disk drives. If you have single-density flexible 
disk drives, you should have more than two of them; in this case, you should put your program 
on the third disk, since it probably will not fit on the Pascal-86 disk in drive 1 . 

Although MAIN. SRC only has Pidgin Pascal statements at this time, you will edit them to make 
them real Pascal-86 statements as they appear in figures in Chapter 4. 
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"One of the most important aspects of any computing tool is its influence on the thinking 
habits of those who try to use it..." 

-E.W.Dijkstra 



The Series III Microcomputer Development System was designed to support a variety of pro- 
gramming techniques with several programming languages. The preceding chapters give you 
the background you need to use this system wisely, and this and the following chapters help 
you decide the criteria for decomposing your application into modules and picking the 
appropriate language to use for each module. 

One popular approach to programming is the top-down approach, where you define the prob- 
lem completely, design an abstract algorithm to solve the problem, and refine this algorithm 
into self-supporting modules that can be coded and compiled separately. Typically, the main 
module would contain the most abstract algorithm— the control algorithm at the top of the 
design that solves tne entire problem. The subordinate modules perform the procedures 
dictated by the main module. 

Pascal-86 is a language that is ideal for the main module of such a modular solution. Using 
Intel's Pascal-86 compiler, you can decompose a program into modules that can be compiled 
separately, whereas other Pascal compilers only compile whole programs which have to be 
tailored to fit into microprocessor environments. 

Perhaps the most important reason for Pascal's wide acceptance is the fact that it is a 
language that closely resembles English. In the past, programmers had to keep their algorithm 
designs well within the constraints of programming languages that were designed to express 
mathematical equations. In other words, at the outset they had to think in terms of the pro- 
gramming language available to them. This approach reinforced the practice of giving 
implementation ("how to") information in the problem definition (for example, "the input to 
this program is to be formatted on cards in columns 0-15 ..."). 

In Chapter 3 we designed an algorithm for the climate control of a building using English, which 
we jokingly call Pidgin Pascal. Since our control structures are in English, we have been able 
to communicate this algorithm easily and test its logic before translating it into Pascal-86. By 
now we should have a complete problem definition and a clean algorithm that could be 
translated into any programming language. 

TRANSLATING PIDGIN PASCAL TO PASCAL-86 

Figure 4-1 shows the main climate control algorithm, described in Pidgin Pascal. Several 
assumptions are made: that another subordinate module will operate the climate system, that 
yet another module will access and store the data, and that the data itself will be in the form of 
a record, which will be available to this algorithm. 
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As in typical development situations, a change has just occurred in our climate system that we 
software engineers have to accomodate: the first version of our climate system will not have 
cooling methods— only heating methods. We must design the software to make room for cool- 
ing methods in the future. 

We made another change to the algorithm to accomodate a "panic" condition. An algorithm is 
not complete unless it can handleany situation; remember, Murphy said that if it can go wrong, 
it will. Therefore, we added a test to see if the climate system can handle the request for heat. 
If neither the collector water nor the tank water is hot enough to heat the building, a panic con- 
dition occurs that stops the normal operation of the climate system. At this time, it is sufficient 
to simply stop the program and output warning messages; later, we can add more procedures 
to handle such panics. 

Using CREDIT (as described in Chapter 3), you can change this algorithm into Pascal-86 by 
adding the Pascal-86 statements and using comment symbols to turn the English sentences 
into program comments. The (* and *) symbols tell the Pascal-86 compiler to ignore whatever is 
between them. Some comments are only a few words surrounded by the (* and *) symbols, but 
comments can take up many lines, as shown at the end of the program in figure 4-2. As soon as 
the compiler sees the (* symbols, it ignores the characters and lines following it until it sees 
the*) closing symbols. 

These comments are carried over with the program statements to the listing file produced by 
the compiler. You use the listing file as documentation for the program. You'll see a listing file 
later in this chapter. 

Figure 4-2 shows the same algorithm expressed in Pascal-86 statements, with the English 
sentences masquerading as program comments. We also added more comments. It is a good 
practice to write the comments of a program before writing the actual program statements. 



Maintain the climate of a building using a system comprised of 
heat i ng methods . 

Startup the climate system. 

While the system is operating, do (and repeat) the following: 

Get the data needed for each pass: the time, the temperatures, 
the weather, the state of the solar collector, etc. 
Store this data . 

Based on temperature data, see if there is a request 

for heat . 

If there is no request, choose ''no method'' as the method, 

and operate the system with this method. 
If there is a request for heat, determine whether the 

system can handle the request. If not, cause a panic. 

Otherwise, determine the heating method, 

and operate the system with this method. 

If no method is possible (panic or abnormal conditions), 
shut down the climate system. 

Figure 4-1 . Algorithm for the Climate Control Main Module 
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(••Type and variable declarations to be supplied later**) 

(••Public procedures external to this program will be supplied later**) 

PROGRAM Ma in Control (INPUT, OUT PUT) ; 

BEGIN (**Main Control Algorithm**) 

StartUpSystem; (*procedure to start up the climate system*) 

Operat i ng:=TRUE; 

Panic : = FALSE; 

WHILE Operating DO (*While the system is operating, do 
(and repeat) the following:*) 
BEGIN 

GetData(CurrentData); 

(*Get data needed for each pass: temps, time, etc.*) 
StoreData(CurrentData); (*Store this data as record*) 

(**If there is a request for heat, determine whether the system 
can handle the request. If not, cause a panic. 
Otherwise, determine the heating method, 
and operate the system with this method. 
If there is no request for heat, choose "no method, •' 
and operate the system with this method. **) 

WITH CurrentOata DO 
BEGIN 

IF InsideTemp<ThermostatSett i ng THEN (*if request*) 
BEGIN 

IF Co I lectorWaterTemp>Mi nimumForExchanger THEN 
BEGIN ChosenMethod:=CollectorToExchanger; 

OperateSystem(CurrentData); 
END 
ELSE IF Co I lectorWaterTemp>MimimumForHeat Pump THEN 
BEGIN ChosenMethod:=Col LectorToHeat Pump; 

OperateSystem(CurrentData) ; 
END 
ELSE IF TankWat erTemp>Mi nimumForExchanger THEN 
BEGIN ChosenMethod:=TankToExchanger; 

OperateSystem(CurrentData); 
END 
ELSE IF TankWaterTemp>MimimumForHeatPump THEN 
BEGIN ChosenMethod:=TankToHeatP ump ; 

OperateSystem(CurrentData); 
END 
ELSE IF H ea ted Tank Temp>Mi nimumForHeat Pump THEN 
BEGIN ChosenMet hod :=Hea ted Tank ToHeat Pump; 

OperateSystem(CurrentData); 
END 
ELSE Panic:=TRUE; Operat i ng :=FALSE; 
END (*if heating request*) 
ELSE (*no heating request*) 

BEGIN ChosenMethod:=NoMethod; 

OperateSystem(CurrentData); 
END; 
END; (*End routine WITH Cur rent Data*) 
END;(*Whileoperating*) 
ShutDownSystem(CurrentData); (* panic or abnormal condition *) 
END. 

Figure 4-2. First Try at Coding the Main Program 
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(**The following are only comments: 

The following procedures will be coded in another module 
called the Operation Module: 

PROCEDURE OperateSystem(CurrentData) 

This procedure will operate the system and constantly 
maintain heat gain in the system. Depending on the 
heating method chosen, it opens certain valves and 
closes others, and turns on certain pumps and turns 
off others. It also maintains a flow of heated water 
to the storage tank . 

NOTE: for our testing purposes, a dummy OperateSystem 
procedure will only display messages telling us what 
heating method was chosen, and temperature data. 



PROCEDURE ShutDownSystem(CurrentData) 

This procedure will perform an orderly shut down if a 
panic or abnormal condition occurs. The shut down must 
keep warm water flowing through the solar collector and 
close any extraneous valves, etc. It must also send a 
warning messages to the console, advising manual operation 
of the furnace , et c . 

NOTE: for our. testing purposes, a dummy ShutDownSystem 
procedure will only display data and a shutdown message. 



PROCEDURE StartUpSystem 

This procedure will start the climate system (cold start, 
or after ShutDownSystem occurs), open necessary valves, 
etc. It will also display a startup message. 

NOTE: for our testing purposes, a dummy StartUpSystem 
procedure will only display a startup message. 



The following procedures will be coded in another module 
called the GetData Module: 

PROCEDURE GetData(CurrentData) 

This procedure will obtain the data from a PL/M-86 module 
called PLMDATA that accesses ports to obtain temperature 
data. Data other than temperature data will come from 
ports via port input/output procedures in this Pascal-86 
module. 

NOTE: for our testing purposes, a dummy GetData procedure 
will obtain all data from the console. 



Figure 4-2. First Try at Coding the Main Program (Cont'd.) 
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PROCEDURE StoreData(CurrentData) 

This procedure will store the data record CurrentData in a 
file (the file would probably reside in non-volatile bubble 
memory) . 

NOTE: for our testing purposes, a dummy StoreData procedure 
will simply output the data to the console. 



This is the last line of comments.**) 

Figure 4-2. First Try at Coding the Main Program (Cont'd.) 



This guide cannot possibly explain Pascal syntax— there are several books mentioned in the 
Bibliography that can give you the background you need, and the Pascal-86 User's Guide pro- 
vides all the information you need to use Intel's extensions to standard Pascal. 



PASCAL-86 DATA TYPES 

A major advantage that Pascal has over other high-level languages is its strong type checking 
mechanisms that enforce data typing. By using Pascal's data types, you avoid some of the 
classic causes of errors in programs— the ambiguities involved with using simple X and Y 
variables to hold truly non-numeric data, the mistakes that occur when you attach arbitrary 
meanings to numeric data, and the complexities that are magnified by ambiguous variable 
names. 

An example is worth a thousand explanations. In the Pascal-86 algorithm in figure 4-2, we make 
assignments like this one: 

ChosenMet hod :=TankToExc hanger; 

If ChosenMethod and TankToExchanger are declared properly in the module heading (not 
shown in figure 4-2, but shown later in this section), the Pascal-86 compiler will know their 
meanings. When you read this assignment, you know exactly what heating method has been 
chosen. The data type is a type of heating method, not an integer representing a method. In 
other programming languages you might be able to have a variable named "ChosenMethod" 
and another variable named "TankToExchanger", but you would also have to be sure to assign 
proper numeric or string values to them. A typical way of expressing the above assignment in 
PL/M would be: 

CHOSENSMETHOD = 2 
/*where 2 is the appropriate method*/ 



or 



CHOSENSMETHOD = T$T0$EXCH 
/ * w h e r e T$T0$EXCH has already been assigned the appropriate 
va lue*/ 
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In both cases, you have to know a numeric code for the heating method. In Pascal, however, 
you only have to define a set of heating methods, and pick one for the assignment. Here is an 
example of such a definition: 

TYPE Heat i ngMethods = ( Co I I ec t o rToExc hange r , 

Co I Lee t orToHeat Pump , 
TankToExehange r , 
TankToHeat Pump , 
Heat edTankToH eat Pump , 
NoMethod); 

( * T h e above defines the data type HeatingMethods, which is 
used to define the variable ChosenMethod below.*) 



VAR ChosenMethod : HeatingMethods; 



In order to assign a value to ChosenMethod, the program must assign one of the methods in 
the set of type HeatingMethods. Any other assignment would cause a compiler error message 
to occur. By enforcing this data typing mechanism, the Pascal-86 compiler reduces the number 
of run-time errors by flagging the data type errors early in the game. 

There are several standard Pascal data types that are useful. For example, you can define a 
variable to be of type BOOLEAN, which means that the only values that can be assigned to the 
variable are the values TRUE and FALSE. The variables Operating and Panic are of type 
BOOLEAN; they are either TRUE or FALSE. 

Note that ChosenMethod and CHOSENMETHOD would refer to the same variable, since lower 
case characters are treated as upper case. This feature allows you to create long identifying 
names with combinations of upper and lower case characters that are easy to read and 
understand. 

ANOTHER LOOK AT MODULARIZING AND HIDING INFORMATION 

The programming technique called information-hiding is not an excuse for designers to 
withhold information from their documentors— it is more akin to a technique we use to hold a 
lot of information in our minds. When we have to interface with several different organizations 
within a company in order to get a job done, we don't pay attention to the inner workings of an 
organization; we simply assume that the organization will do its job, and we define our inter- 
face with the organization. Their organization is one module, and ours is another module; the 
job gets done because the modules know how to communicate to each other without interfer- 
ing in each other's details. 

Most logical algorithms are designed with assumptions about working modules. In our 
algorithm in figure 4-2, we assume that the procedures StartUpSystem, GetData, StoreData, 
OperateSystem and ShutDownSystem will work as planned, even though they are not yet writ- 
ten. We also assume that another group may write them. We can make these assumptions 
because we designed our main module to hide most of the details about choosing heating 
methods. 

So far, the main module's algorithm decides the appropriate heating method based on a set of 
data. Once the algorithm is written, it may never change; and if it had to change, its change 
should not affect the other modules. However, we could change the control algorithm so that 
changes to the heating methods, or additional heating methods, would not even affect the 
main control algorithm. A simple way to do this would be to turn the heating method determina- 
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tion algorithm into an independent procedure called DetermlneMethod, extract from this 
algorithm the calls to OperateSystem, and put the call to OperateSystem in the control 
algorithm. 

The resulting main module is shown in figure 4-3. We added the module heading, but we still 
need the interface specification and variable declarations (shown later). 

MODULE MainControl; 

(* Interface specification goes here, to be supplied Later. *) 

( * Type definitions and variable declarations to be supplied later. *) 

PROGRAM Mai n Con tro I (INPUT, OUT PUT) ; 



PROCEDURE Determi neMethodCVAR CurrentData : SystemData); 
BEGIN 

WITH CurrentData DO 
BEGIN 

IF Insi deTemp<ThermostatSett i ng THEN 
BEGIN 

IF Col lee to rWaterTemp>Mi nimumForEx changer THEN 

ChosenMethod:=CollectorToExchanger 
ELSE IF Col lectorWaterTemp>Mi nimumForHeatPump THEN 

ChosenMethod: = Col lee to rToH eat Pump 
ELSE IF Tan kWat e rTemp>Mi nimumForEx changer THEN 

ChosenMethod:=TankToExchanger 
ELSE IF TankWaterTemp>Mi nimumForHeatPump THEN 

ChosenMethod : =TankTo Heat Pump 
ELSE IF HeatedTankTemp>Mi nimumForHeatPump THEN 

ChosenMethod:=HeatedTankToHeatPump 
ELSE Panic:=TRUE; Operat i ng : = F A L S E ; 
END 
ELSE (*no heating request*) ChosenMethod : =NoMet hod 
END; ( * W i t h CurrentData*) 
END; (* Determi neMethod) 

(•••*•******•** MAIN PROGRAM *************************************) 

BEGIN 

StartUpSystem; 
Operating:=TRUE; 
Panic:=FALSE; 

WHILE Operating DO (*while system is operating, do:*) 
BEGIN 

GetData(CurrentData); (*Get the temps, time, etc.*) 
StoreData(CurrentData); (*Store this data as record*) 
Determi neMethod (Current Data) ; (*this detects a panic*) 
OperateSystem (CurrentData); 
END; (*while operating*) 
ShutDownSyst em (CurrentData); 
END. (*Main Control Algorithm*) 

Figure 4-3. Second Try at Coding the Main Program 
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The DetermineMethod procedure now hides all the information about choosing the 
appropriate heating method. We could also rewrite it to include cooling methods, or to change 
the heating methods. The procedure expects to receive the record CurrentData, and it only 
changes the value of the variable ChosenMethod. 

The OperateSystem procedure will not be written until more facts are known about the hard- 
ware of the actual climate system. However, we already know that if we make a decision about 
a chosen method, include that method in the data record CurrentData, and send that data 
record to the OperateSystem procedure properly, the OperateSystem procedure will know 
how to operate the system. We defer these details to a later time when we'll have a prototype 
system to operate. 

PASSING DATA TO OTHER MODULES-PARAMETER PASSING 
TECHNIQUES 

We designed our main module so that it will receive a record of information. A Pascal-86 record 
is much like a PL/M-86 structure which can be defined to hold certain datatypes. We have to 
define this record in order to write the main module, but we can defer decisions about obtain- 
ing the data in order to preserve our options. 

A PL/M-86 procedure could easily obtain the data and build the structure according to inter- 
face specifications; so could an 8086/8087/8088 Macro Assembly Language program, or an 8089 
Assembly Language program. In fact, we might be able to use existing routines to obtain the 
data, and simply write another routine to structure the data accordingly. 

In any case, we only have to pass the address of the structure to the Pascal-86 main module, 
which knows what to do with it. This parameter-passing technique is known as pass by 
reference, because the main module only needs a reference to the address of the structure in 
order to treat the structure as a Pascal record. 

Another parameter-passing technique is pass by value, where a procedure calls another pro- 
cedure and sends it a value rather than an address. We don't use this technique in our applica- 
tion, since our procedures need to access data in the record. We decided against passing 
specific values from this data record, and decided instead to make the entire data record 
available to the appropriate procedures. 

To define the data record properly and still provide the ability to change it easily, we created a 
data type for the record: 

TYPE (*definitions publicly defined in this module*) 



SystemData = RECORD 

ChosenMethod : HeatingMethods; 

Ins i deTemp, 

Thermostat Sett i ng : Ai r Temperature ; 

Co I lectorWaterTemp, 
TankWat erTemp , 
HeatedTankTemp 
AmountOf Sun I i ght 
Hour 
Minute 
END (*SystemData*) ; 



Wate rTemperature ; 
Integer; 
00. .24; 
00. .59; 



48 



PROGRAMING IN PASCAL-86 



Using the data type SystemData, we defined the variable CurrentData to be of that type: 

VAR 

CurrentData : SystemData; 



We pass the variable CurrentData to other procedures. If we were to change the data fields in 
the record, we would only have to change the definition of SystemData; we would not have to 
change any of the calls that pass the variable CurrentData. If the data fields kept the same 
names (ChosenMethod, ThermostatSetting, etc.), we would not have to change the routines 
that use those data fields. 



THE INTERFACE SPECIFICATION 

A module that calls a procedure in another module must have some information about where 
the other procedure is, and it must provide some information to the other procedure about the 
data being passed. Intel's Pascal-86 provides a mechanism for supplying the appropriate 
information to all modules that are to be linked to form a program— it is called an interface 
specification. 

The interface specification typically holds the type definitions and variable declarations that 
are needed by all modules, and it also contains the names of procedures (with their 
parameters) that are public to other modules; that is, they can be called from other modules. 
Each module of the entire program contains this information. Figure 4-4 shows the interface 
specification for our program. 

In addition to PUBLIC definitions in the interface specification, a module can have PRIVATE 
type definitions and variable declarations for variables used only within the module. Our 
Operation module will have a PRIVATE section for all variables that are only used within the 
module, but our MainControl main module does not need one. In Pascal-86, a PRIVATE 
heading is used in non-main modules instead of a PROGRAM heading. 

Several enumerated types are defined in our program: AirTemperature and WaterTemperature 
are defined as types that can only have values in the ranges specified. The variables Hour and 
Minute are also of enumerated types, but since their ranges do not change, their types are not 
defined separately. By defining the temperature types separately, we can easily change their 
ranges without affecting the data record. 

By defining the data record as type SystemData, we can easily change data fields in the record 
without changing the CurrentData declaration. By defining and declaring types and variables in 
the interface specification, we can maintain the interface specification separately (and change 
definitions and declarations) without affecting the procedures. 



TEST VERSION OF THE CLIMATE CONTROL SYSTEM 

Since our hardware designs are not yet firm, we should put together a test version of our 
system that does not interact with any prototype hardware. This version should include 
dummy procedures for the procedures that would normally rely on 8088 ports and other 
hardware. 
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PUBLIC MainControt; (*section of interface specification*) 
CONST (^declarations declared publicly in this module*) 



Mi nimumForEx changer 
Mi nimumF or Heat Pump 



35;(*degrees Celsius*) 
13; 



TYPE (*definitions publicly defined in this module*) 

Ai rTemperature =-20..120;(*degrees in Celsius*) 
WaterTemperature =0- .120; 
HeatingMethods =(CollectorToExchanger, 
Co I lectorToHeatPump, 
TankToExchanger , 
TankToHeatPump, 
Heated Tank To He at Pump, 
NoMethod) ; 
SystemData = RECORD 

ChosenMet hod 
InsideTemp, 
Thermostat Sett i ng 
Co I lectorWaterTemp , 
Tank Water Temp, 
HeatedTankTemp 
Amount Of Sun I i ght 
Hour 
Minute 
END (*SystemData*) ; 

VAR (*variables publicly defined in this module.*) 



HeatingMethods; 
Ai rTemperature ; 



WaterTemperature; 
Integer; 
00. .24; 
00. .59; 



CurrentData 

Ope rating, Pan i c 



: SystemData; 
: BOOLEAN; 



PUBLIC GetData; (*GetData Module containing GetData & StoreData*) 

PROCEDURE GetDataCVAR Cu r rent Dat a : Sy st emDat a) ; 
PROCEDURE StoreData (VAR Current Data : SystemData) ; 

PUBLIC Operation; (*0peration Module containing OperateSystem, 
StartUpSystem and Shut DownSystem*) 
PROCEDURE StartUpSystem; 

PROCEDURE OperateSystem (VAR Current Data : SystemData) ; 
PROCEDURE ShutDownSystem(VAR Cur rent Dat a : Syst emDat a) ; 



Figure 4-4. The Interface Specification 
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The dummy versions are shown in figure 4-5. You should type these versions exactly as you 
see them, with the StartUpSystem, OperateSystem, and ShutDownSystem dummy procedures 
in the dummy Operation module stored in the file :F1 :DUMOP.SRC, and GetData and StoreData 
dummy procedures in the dummy GetData module stored in the file :F1:DUMDAT.SRC. The 
MalnControl module should be stored in :F1 -.MAIN. SRC, and the interface specification shown 
in figure 4-4 should be typed into the file :F1:INSPEC.SRC. If you cannot fit all of these files on 
the disk in drive 1, you should put all of them on another disk— and use your own pathname 
(:Fn:) for the ".SRC" files. For our examples we assume that these files are on the disk in drive 
1 , along with the Pascal-86 compiler and run-time libraries. 

Figure 4-5 shows each module and the dummy procedures. Since the interface specification is 
repeated in each module, we use a shortcut when compiling the modules by putting the com- 
mon interface specification in a seperate file (:F1 .INSPEC.SRC), and we use the INCLUDE con- 
trol in acontrol line as shown: 

$INCLUDE(: F1 : INSPEC.SRC) 

If you put INSPEC.SRC on a disk in a drive other than drive 1, use your own pathname instead 
of :F1 -.INSPEC.SRC. 



MODULE MainControl; 

(* Interface specification common to all modules *) 

$INCLUDE(:F1 -.INSPEC.SRC) 

PROGRAM MainControl (INPUT, OUTPUT) ; 

(* end of interface specification *) 

PROCEDURE Determi neMethod(VAR CurrentData : SystemData); 
BEGIN 

WITH CurrentData DO 
BEGIN 

IF Insi deTemp<ThermostatSett i ng THEN 
BEGIN 

IF Co I Lee torWat e rTemp>Mi nimumForExchange r THEN 

ChosenMet hod :=CoL I ectorToExc hanger 
ELSE IF Co I LectorWaterTemp>Mi nimumForHeatPump THEN 

ChosenMet hod :=Col LectorToHeat Pump 
ELSE IF TankWat erTemp>Mi nimumForExchange r THEN 

ChosenMethod:=TankToExchanger 
ELSE IF TankWaterTemp>Mi nimumForHeatPump THEN 

ChosenMet hod : =TankTo Heat Pump 
ELSE IF HeatedTankTemp>Mi nimumForHeatPump THEN 

ChosenMethod: =HeatedTankToHeat Pump 
ELSE Panic:=TRUE; Operat i ng : =F ALSE; 
END 
ELSE (*no heating request*) ChosenMet hod : =NoMet hod 
END; (*With CurrentData*) 
END; (* Determi neMet hod) 



Figure 4-5. Test Version of Our Climate Control System 
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(a************* MAIN PROGRAM *•*********************•***'**********) 

BEGIN 

StartUpSystem; 
Operating:=TRUE; 
Panic:=FALSE; 

WHILE Operating DO (*wh i Le system is operating, do:*) 
BEGIN 

GetData(CurrentData); (*Get the temps, time, etc.*) 
StoreData(CurrentData); (*Store this data as record*) 
Determi neMet hod (Cur rentData) ; (*this detects a panic*) 
OperateSyst em (Current Data); 
END; (*while operating*) 
ShutDownSystem( CurrentData); 
END. (*Main Cont ro I A Igor i t hm*) 



(*This is a dummy GetData module, with dummy GetData 
and StoreData procedures, for use with MainControl 
module in testing phases. It only performs console 
input to get Celsius temperatures, the time of day, 
and the amount of sunlight (insolation) for the 
solar collector. Use PLMDATA module for real 
app I i cat ion.*) 

MODULE GetData; 

(* Interface specification common to all modules *) 

$INCLUDE(:F1:INSPEC.SRC) 

PRIVATE GetData; 

(* end of interface specification *) 



PROCEDURE GetData(VAR Cur rentData : SystemData) ; 
BEGIN 

WITH CurrentData DO BEGIN 

WRITE('Type the thermostat setting in degrees Celsius:'); 

READLN(ThermostatSetting); WRITELN; 

WRITE('Type the inside temperature reading in Celsius:'); 

READLN(InsideTemp); WRITELN; 

WRITE ('Type the temperature of the collector water in Celsius:'); 

READLN(CollectorWaterTemp); WRITELN; 

WRITE(*Type the t emp erature of the tank water in Celsius:'); 

READLN(TankWaterTemp); WRITELN; 

WRITE('Type the temperature of the heated tank water in Celsius:'); 

READLN(HeatedTankTemp); WRITELN; 

WRITECType the hour of day, as in 04 or 24:'); 

READLN(Hour); WRITELN; 



Figure 4-5. Test Version of Our Climate Control System (Cont'd.) 
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END 
PRO 
BEG 
(*D 



WRITEC'Type the minute of the hour, as in 01 or 59: '); 
READLN(Minute); WRITELN; 

WRITEC'Type the amount of sunlight, any integer will do for now:'); 
READ LN( Amount Of Sun light); WRITELN; 
END; (*with CurrentData*) 

CEDURE StoreDataCVAR Cur rentData : SystemData) ; 

IN 

ummy procedure, eventually will store CurrentData in a file*) 

WITH CurrentData DO BEGIN 

WRITELNC '); 

WRITELNCCURRENT DATA IS AS FOLLOWS:'); 

WRITELNC ■); 

WRITELNC 'Thermostat Setting is ' , ThermostatSett i ng , ' C ' ) ; 

WRITELNC' Inside temperature is ' , InsideTemp, ' C ' ) ; 

WRITELNC ' Temperature of collector water is ' , Col lectorWaterTemp, ' C ' ) ; 

WRITELN C 'Temperature of tank water is ' , TankWaterTemp, ' C ' ) ; 

WRITELNC ' Temperature of the heated tank water is ' , HeatedTankTemp, ' C ' ) ; 

WRITELNCTime of day is • , Hour, •:', Minute) ; 

WRITELNC 'Amount of sunlight is ' , AmountOf Sun I i ght ) ; 

WRITELN; (*a blank line*) 
END; (*with CurrentData*) 



END. 

C*This is a dummy Operation module, with dummy StartUpSystem, 

Shut DownSystem, and OperateSystem procedures, 

for use with MainControl module in testing phases.*) 

MODULE Operation; 

(* Interface specification common to all modules*) 

$INCLUDEC:F1 : INSPEC . SRC) 

PRIVATE Operation; 

C* end of interface specification *) 



PROCEDURE StartUpSystem; 
BEGIN 

WRITELN ('Climate system is now on.'); 

WRITELN (' ') ; 

WRITELN; 
END; 

PROCEDURE OperateSystemCVAR Cur rent Data : SystemData) ; 
BEGIN 

WITH CurrentData DO BEGIN 

WRITELN (»==============================================') ; 

WRITELN ('The Climate System is now operating.'); 

Figure 4-5. Test Version of Our Climate Control System (Cont'd.) 



53 



CHAPTER 4 



WRITELN; 

WRITELNCThe Time is ' , Hour , • : • , Mi nute) ; 

WRITELNCThe inside temperature is ' , Ins i de Temp, ' C ') ; 

WRITELNCThe thermostat setting is ', Thermostat Sett i ng ,' C ') ; 

WRITEC 'Method chosen to heat the building: '); 

CASE ChosenMethod OF 

CollectorToExchanger: WRITEC Solar Collector to Exchanger'); 

Co I lectorToHeatPump : WRITECSolar Collector to Heat Pump'); 

TankToExchanger : WRITE('Tank to Exchanger'); 

TankToH eat Pump : WRITEC'Tank to Heat Pump'); 

HeatedTankToHeatPump: WRITEC Heated. Tank to Heat Pump'); 

NoMethod : WRITECNo heat required'); 

END; 

WRITELN; 
WRITELN ('==============================================»); 

WRITELN; C*write a blank line.*) 
END; 
E N D ; ( * p e r a t e S y s t em* ) 



PROCEDURE ShutDownSystemCVAR CurrentData -.SystemData) ; 

BEGIN 

WR I TELNC ::::::::::::::::::::::::::::::::::::::::::::::::: • ); 

IF Panic THEN WRITELN C PANIC occurred, NORMAL shutdown.') 

ELSE WRITELNCNo panic occurred, ABNORMAL shutdown.'); 
WRITELNC ::::::::::::::::::::::::::::::::::::::::::::::::: ') ; 

WITH CurrentData DO BEGIN 

WRITE('Last chosen heating method was: '); 
CASE ChosenMethod OF 

CollectorToExchanger: WRITE('Solar Collector to Exchanger'); 
Col lectorToHeatPump : WRITEC Solar Collector to Heat Pump'); 
TankToExchanger : WRITEC'Tank to Exchanger'); 

TankToHeatPump : WRITEC'Tank to Heat Pump'); 

HeatedTankToHeatPump: WRITEC. Heated Tank to Heat Pump'); 
NoMethod : WRITECNo heat required'); 

END; 

WRITELN; 

WRITELNCThermostat Setting is ' ,ThermostatSett i ng, ' C ' ) ; 
WRITELNC ' Inside temperature is ' , InsideTemp, ' C ' ) ; 

WRITELNC Temperature of collector water is ' , Col lectorWaterTemp, ' C ' ) ; 
WRITELN ( 'Temperature of tank water is ' , Tank Wat erTemp, ■ C ') ; 
WRITELN C Temperature of the heated tank water is * , HeatedTankTemp, ' C ' ) ; 
WRITELNCTime of day is ', Hour, ':', Mi nute) ; 
WRITELNC ' Amount of sunlight is ' , AmountOf Sun l'i ght ) ; 
END ; ( *w 1 1 h CurrentData*) 

WRITELNC ::::::::::::::::::::::::::::::::::::::::::::::::::: :::'); 
WRITELN; 

WRITELNCGoodnight, Irene...'); 
END. (*ShutDownSystem*) 



Figure 4-5. Test Version of Our Climate Control System (Cont'd.) 
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THE PASCAL-86 COMPILER 



A compiler is a program that translates your high-level language statements into machine 
code. Machine code, sometimes called object code, consists of the instructions that machines 
understand, whereas high-level language statements are instructions that humans under- 
stand. You must translate your high-level language statements into machine code by compil- 
ing your high-level language program. 

The Pascal-86 statements we typed (using CREDIT) are program source statements. We now 
have three source files: :F1:MAIN.SRC (for the MainControl module), :F1:DUMDAT.SRC (for 
the dummy GetData module), and :F1:DUMOP.SRC (for the dummy Operation module). To 
translate these source statement modules into object code modules, we must compile each 
source module separately. 

The Pascal-86 compiler is supplied as the file PASC86.86. You invoke the compiler by using the 
RUN command to load and execute it in the "8086 side" (8086 execution mode) of the Series III 
system. The compiler usually produces two files: a listing file that contains a listing of the 
source program as the compiler saw it, and an object file that contains the actual machine 
code. The listing file usually contains a listing of the source statements, additional information 
about the compilation, and any errors that occurred during the compilation. 

For example, assume that MAIN. SRC, the first module, is in directory :F1:. The Pascal-86 
Compiler, PASC86.86, is also in directory :F1:. To compile this module, use the following 
command: 

-RUN :F1:PASC86 :F1:MAIN.SRC DEBU6<cr> 

Let's analyze this command line. RUN is the command used to execute the program in the 
"8086 side" of the system. :F1:PASC86 is the pathname (without the ".86" extension) of the 
Pascal-86 Compiler (RUN supplies the ".86" extension). :F1:MAIN.SRC is the pathname for the 
MAIN.SRC module. Finally, DEBUG is a compiler control which tells the compiler to do 
something special (described later). 

This compilation produced two files: :F1:MAIN.LST is the listing file, and :F1:MAIN.OBJ is the 
object file that contains the object code. :F1:MAIN.SRC is still in drivel. All of these files are in 
directory :F1 :, since that is where MAIN.SRC resides. 

Compiler controls tell the compiler to perform certain operations. Most controls have default 
settings that you do not have to specify. For example, the PRINT control is always on unless 
you specify NOPRINT. The PRINT control tells the compiler to produce a listing file, and use 
the name of the source file with an ".LST" extension (e.g., :F1:MAIN.LST). We could have 
used this version of the PRINT control: 

-RUN :F1:PASC86 :F1:MAIN.SRC DEBUG PR I NT ( : LP : )<c r> 

This version of the PRINT control sends the listing to the line printer (:LP:), rather than creating 
:F1 :MAIN. LST as a listing file. 

Most of the compiler control default settings are useful for everyday compiling; that is, there is 
no need to learn how to use the compiler controls unless you want to do something special. 
For example, if you want the compiler to issue a warning message whenever it sees a non- 
standard Pascal statement (an Intel extension to the standard Pascal language), use the 
NOEXTENSIONS control. 
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We used the DEBUG control for a good reason: we want to do symbolic debugging while the 
program is running (using DEBUG-86, described in Chapter 7). You will want to do symbolic 
debugging during the first run of your program. Use the DEBUG control to prepare your pro- 
gram for symbolic debugging unless your program is extremely large. 

Most compiler controls can be specified in the invocation line as we show above. Most com- 
piler controls can also be imbedded in the source file— as control lines. For example, we used 
the INCLUDE control in a control line: 

$INCLUDE( : F1 ; INSPEC .SRC) 

The INCLUDE control allows you to insert source statements from another file into this com- 
pilation. In this case, we wanted to insert the common interface specification (in 
:F1:INSPEC.SRC) into our compilation. The INCLUDE control saved us from typing the same 
interface specification for all three source files. 

We also need to compile the other modules separately. The following invocation line compiles 
ourGetData module in DUMDAT. SRC: 

-RUN :F1:PASC86 : F1 : DUMDAT . S RC DEBU6<cr> 

SERIES 1 1 I Pascal-86 V1 .0 

PARSE 

68 99 
***WARNING, input : ' ' END 
***was repaired to: "END ; ' ' 
END PARSEC1), ANALYZE(O), NOXREF, OBJECT 

COMPILATION OF GETDATA COMPLETED, 1 ERROR DETECTED. 
END OF Pascal-86 COMPILATION. 

The compiler displays a sign-on message, then the word "PARSE" to show that it is parsing 
the program statements. During the parsing phase, the compiler discovered an error— the 
M END " statement was not punctuated correctly. The compiler repairs our error, and con- 
tinues to compile. Each phase of compiling is displayed with a number in parentheses— the 
number of errors detected during the phase. The compiler only detected that one error, 
and since the error was easily repaired, the compilation was successful. We now have 
:F1 :DUMDAT. OBJ containing the object module. 

To compile our dummy Operation module, we use the following invocation line: 

-RUN :F1:PASC86 : F 1 : DUMOP . SRC DEBUG<cr> 



The listing files :F1 :MAIN. LST,:F1:DUMDAT.LST, and :F1:DUMOP.LST are shown in figure 4-6. 
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SERIES-III Pascal-36/ XC31 



PAGE 1 
MAINCONTROL 



Source File: :F1:MA 
Object File: :F1:MA 
Controls Specified: 

STMT LINE NESTING 

1 10 3 

2 2 



IN. SRC 

in.:bj 

DEBUG. 



SOURCE TEXT: : F1 : MAIN. SRC 
MODULE MainControi; 



(* Interface spac if ic at ion com 



to all modules *) 



22 
23 

24 



6 3 

7 



20 

21 








11 


26 





1 


12 


27 





1 


13 


28 





1 


14 


29 





1 


15 


30 









16 
17 


34 
35 










18 


37 








19 
20 


39 

40 











$INCLUjE(:F1 :INSP6C.SRC) 

PU3LIC MainControi; (*section of interface specification*) 

CONST (*declarations declared publicly in this module*) 



Mi nimumForEx changer 
MinimumFornaatPump 



35/'(*degre9s C9lsius*) 

13; 



TYPE (*d9f initions publicly defined in this module*) 

AirTamperatura =-20. . 120 ;(* degrees in Celsius*) 
WaterTamperature =0 - . 1 20; 
HeatingMetnods =(CollectorToExchanger/ 

CollectorToHeatPump, 

TankToExchanger / 

TankToHeatPump/ 

HeatadTankToHeatPump, 

NoMethod)/" 



S ystamDat a 



= RECORD 

ChosenMethod 
InsideTemp/ 
Thermostat Setting 
CollactorWaterTemp/ 
TankWaterTemp, 
HaatadTankTemp 
AmountOf Sunlight 
Hour 
Minute 
END (*SystemData*); 



HeatingMethods; 
AirTemperature/' 



: Water Temperatu 

: Integer; 

: 00. .24; 

: 00.. 5 9; 



VAR (*variablas publicly defined in this module.*) 



CurrentDat? 
Operating/ Panic 



: SystemData; 

: boolean; 



PUBLIC GetOata; (*GetData Module containing GetData & StoreOat 

PROCEDURE GetData(VAR CurrentDat a : Sy st emData) ; 
PROCEDURE Store3ata(VAR C urrentData : SystemData) ; 

3 U 3 L I C Operation; (*0peration Module containing OperateSystem/ 
StartUpSystem and ShutDouunSy stem*) 
PR0CE0URE StartUpSystem; 

PROCEDURE OparateSystam(VAR C ur rent Data : SystamData) /' 
PROCEDURE ShutDoiunSysta^( VAR Cur rent Da ta : Sy s temData ) ; 



PROGRAM MainCont rpl ( INPUT, OUTPUT); 
(* and of interfaca specification *) 



26 


13 1 





26 


14 


1 


27 


15 1 


1 


27 


16 


2 


28 


17 


2 


28 


18 


3 


29 


19 


3 



33 


23 


3 


35 


25 


3 


37 


27 


3 


40 
41 
42 
44 
45 


29 1 3 

30 1 2 

31 1 2 

32 1 1 

33 



PROCEDURE DetermineMethodCVAR CurrantData : SystemData); 
3EGIN 

WITH CurrantOata DO 
3EGIN 

IF InsideTemp<ThermostatSetting THEN 
5EGIN 

IP CollectorWaterTamp>MinimumForExchanger THEN 

ChosenMethod :=CollectorToExchanger 
ELSE IF CollactorWaterTemp>MinimumForHeatPump THEN 

ChosenMethod : = CollectorToHeatPump 
ELSE IF TankW a ter Temp>Min imumPor E xchanger THEN 

ChosenMethod :=TankToExchanger 
ELSE IF TankWaterTemp>MinimumForHeatPump THEN 

ChosenMethod :=TankToHeatPump 
ELSE IF HeatedTankTemp>MinimumForHeatPump THEN 

ChosenMethod :=HeatadTankToHeatPump 
ELSE Panic:=TRUE; Operating : =PAL SE ; 
END 
ELSE (*no heating reques t* ) ChosenMethod : =NoMethod 
END; (*With CurrentData*) 
END,* (*DetermineMethod) 



Figure 4-6. Listings of Our Test Modules 
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MAIN PROGRAM 



BEGIN 
St 

Opi 



artUpSystem; 

erating:=TRUE; 

nic:=FALSE; 

ILE Operating 00 (*while system is operating/ do:*) 

BEGIN 

GetDat 
StoreD 
Deter 
Operat 

end; ( 
ownSy st 



END. (*Main Cor 



(CurrentData) ; (*Get the temps/ time/ etc.*) 
ta(CurrentOata)/' ( * S t o r e this data as record*) 
ineMethod(CurrentData) ; (*this detects a panic*) 

System (CurrentData); 
ile operating*) 
rrentData)/' 
Algorithm*) 



Summary Information: 



PROCEDURE 
DETERMINEMETHOD 



94 Lines Read. 
Errors Detected. 



33X Utilization of Memor 



SERIES-III Pascal-36/ X031 



OFFSET CODE SIZE DATA SIZE STACK SIZE 
001 1 H 003FH 143D 0006H 60 



327D 0016H 



220 004CH 



Source File: : F1 : DUMDAT. SRC 
Object File: : F1 : DUMDAT .OB J 
Controls Specified: DE3UG. 



STMT LINE NESTING 



= 
= 
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20 





1 = 
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11 
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12 
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13 
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14 


29 





1 = 



SOURCE TEXT: : M : DUMDAT . SRC 

(*This is a dummy GetData module/ with dummy GetData 
and StoreData procedures/ for use with MainControl 
module in testing phases. It only performs console 
input to get Celsius temperatures/ the time of day/ 
and the amount of sunlight (insolation) for the 
solar collector. Use PLM86SDATA module for real 
application .*) 

M00ULE GetData; 

(* Interface specification common to all modules *) 

$INCLUDE(:M :INS?EC.SRC) 

PUBLIC MainControl; (*section of interface specification*) 

CONST (*declarations declared publicly in this module*) 



umForExchanger 
umForHeatPump 



= 35/"(*degrees Celsius*) 

= 13; 



Minim 

TYPE (*def initions publicly defined in this module*) 

AirTemperature =-20 . . 1 20; ( *degrees in Celsius*) 

WaterTemperature =0..120; 

HeatingMethods =(CollectorToExchanger/ 

CollectorToHeatPump/ 

TankToExchanger/ 

T a n k T o H e a t P u m o / 

HeatedTankToHeatPump/ 

NoMethod)/* 



SystemData 



REC0R0 

ChosenMethod 

InsideTemp/ 

Thermostat Setting 

CollectorWaterTemp/ 

TankWaterTemp/ 

H e a t e d T a n k T e m p 

AmountOf Sunlight 

Hour 

Minute 

END (*SystemData*)/* 



: HeatingMethods; 
: AirTemperature; 



: WaterTemperature; 

: Integer; 

: 00. .24; 

: 00. .59; 



Figure 4-6. Listings of Our Test Modules (Cont'd.) 
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VAR C*variables publicly defined in this module.*) 



CurrentData 
Operating/ Panic 



: SystemData; 

: boolean; 



PUBLIC GetOata; C*GetOata Module containing GetOata & StoreData*) 

PROCEDURE GetData(VAR CurrentOata: SystemOata) ; 
PROCEOURE StoreOata<VAR CurrentOata : SystemData) ; 

PU3LIC Operation/ (*0peration Module containing OperateSystem/ 
StartUpSystem and ShutOouinSystem* ) 
PROCEDURE StartUpSystem; 

PROCEDURE OperateSystemCVAR CurrentOata: SystemData) ; 
PROCEDURE ShutDownSystemCVAR Cur rentData : SystemData) /' 



PRIVATE GetData,' 

C* end of interface specification *) 



>tDataCVAR CurrentData: SystemData); 
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♦WARNING/ 


input: 


"END 


*tuas 


repai 


red to 


"END 


70 


58 C 








PROCEDURE 

BEGIN 

WITH CurrentOata DO 3EGIN 

WRITECType the thermostat setting in de 
REAOLN(ThermostatSetting); WRITELN; 
WRITE('Type the inside temperature readi 
READLN(InsideTemp); WRITELN/' 
WRITECType the temperature of the colle 
READLN(CollectorWaterTemp); WRITELN/' 
WRITECType the temperature of the tank 
RE A DLN< Tank Water Temp); WRITELN; 
WRITECType the temperature of the heate 
READLNC Heated Tank Temp); WRITELN; 
WRITECType the hour of day/ as in 04 or 
READLN(Hour); WRITELN/' 

WRITECType the minute of the hour/ as i 
READLNCMinute); WRITELN; 

WRITECType the amount of sunlight/ any 
READLN(AmountOfSunlight); WRITELN; 
(*uiith CurrentData*) 



grass 


Celsius:' 


; 




ng in 


Celsius:' 


; 




ctor 


mater in Celsi 


us:')/' 


water 


in Celsius:') 




d tan 


k water in 


Cel 


sius: ' ) 


24:' 


); 






n 01 


or 59: '); 






integ 


er will do 


for 


now: ' ) 



end; 



end; 



PROCEDURE StoreDataCVAR CurrentData : SystemData) /' 
BEGIN 



mmy prd 

ITH Cur 
WRITE 
WRITE 
WRITE 
WRITE 
WRITE 
WRITE 
WRITE 
WRITE 
WRITE 
WRITEI 
WRITE 

nd; < 



cedu 

rent 

LNC 

LNC 

LNC ' 

LNC 

LNC 

LNC 

LNC 

LNC 

LNC 

LNC 

ln; 

ith 



ta Dl 
RREN 



ally will store CurrentData in a file*) 

GIN 



T DATA IS AS FOLLOWS:*)/" 



ermo 

sid 

mper 



stat 
temp 

ature 
Temperature 
Temperature 
Time of clay 
Amount of s 
C*a blank 1 
CurrentData 



'); 

Setting is ' /Thermos tatSetting/ * C ') ; 
erature is ' / InsideTemp/ 'C * ) ; 

of collector water is ' /CollectorWaterT 

of tank water is •'/TankWaterTemp/ 'C ' ) ; 

of the heated tank water is '/HeatedTan 

is '/Hour/ ': '/Minute); 
unlight is '/ AmountOf Sunlight) ; 
ins*) 



P/'C); 
kTemp/ 'O; 



Summary Information: 

PROCEDURE 
STOREDATA 
GETOATA 



OFFSET C00E SIZE 
04D5H 0222H 546D 
C294H 0241H 577D 



DATA SIZE STACK SIZE 
0010H 16D 
0010H 16D 



104 Lines Read. 

1 Error Detected. 
33% Utilization of Memory. 



06F7H 1783D 0000H 



Figure 4-6. Listings of Our Test Modules (Cont'd.) 
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SERIES-III Pascal-86/ X031 



Source File: :F1 :0UM0P. SRC 
Object File: : ,F1 :OUMOP. OBJ 
Controls Specified: DEBUG. 



STMT LINE NESTING 



SOURCE TEXT: : F1 : DUMOP . SRC 

( * T h i s is a dummy Operation module/ with dummy StartUpSystem/ 

Shu tDoanSystem/ and OperateSy s tem procedures/ 

for use with MainControl module in testing phases. 



= 

= 
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= 



MODULE Operation; 

(* Interface soec i f icat ion com 



on to all modules 



S:NCLUDE(:F1:INSP£C.SRC) 

PUBLIC MainControl; (*section of 



terface specification*) 
CONST (*declarations declared publicly in this module*) 
nger = 35/'(*degreas Celsius*) 



MinimumrorHeatPu 
TYPE (*def initions publicly defined 



this module*) 



Air-Temperature =-20. .120/' (* degrees in Celsius*) 

Wat erTemperature =3. .120; 

Nesting Methods =(CollectorToExchanger/ 

CollectorToHeatPump/ 

Tan kTo Exc hanger/ 

TankToHeatPump, 

HeatedTankToHeatPump, 

NoMethocI) ; 



SystemData 



= RECORD 

ChosenMethod 
InsideTemp, 
Thermostat Setting 
CollectorWaterTemp/ 
TankWaterTemp/ 
Heats dTankTemp 
AmountOf Sunlight 
Hour 
Minute 
END (*SystemData*); 



: HeatingMethods; 
: AirTemperature; 



WaterTempe 
Integer," 
00,. 24; 
00. .59; 



V A R (*variables publicly defined in this module. 



Currant Data 
Operating/ 



: SystemData; 

: boolean; 



Module containing 



StoreOata*) 



PROCEDURE Get0ata'(VAR Cur rent Data : SystemOat a) ; 
PROCEDURE StoreDataCVAR CurrentData : SystemData) ; 

PU3LIC Operation; ('Operation Module containing OperateSystem 
StartUpSystem and ShutDoiunSystem*) 
PROCEDURE StartUpSystem; 

PROCEDURE 0perateSystem(VAR C urrentDat a : SystemData) ; 
PROCEDURE ShutDoiunSystemCVAR C urrent Data : SystemData ) ; 



PRIVATE Operation; 

(* end of interface specification 
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PROCEDURE StartUpSystem," 

BEGIN 

WRITELN ('Climate system is 
WRITELN (*-- • 

W R I T E L N ; 

end; 



PR0CEDU 

BEGIN 
WITH i 
WRIT 
WRIT 
WRIT 
WRIT 
WRIT 
WRIT 
WRIT 



E 0perateSystem(VAR CurrentData : SystemData) ; 
urrentData 00 BEGIN 



:LN(' 



ELN(*The Climate System is nam operating.")/ 

eln; 

ELNCThe Time is '/ Hour /':' /Minute ) ; 
ELN('The inside temperature is '/ InsideTemp/ ' C ') ; 
ELN('The thermostat setting is '/ThermostatSetting/'C')/ 
ECMethod chosen to heat the building: '); 



Figure 4-6. Listings of Our Test Modules (Cont'd.) 
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***WARNING/ 


input: 
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Summary Infc 


rmatio 


PROCEDURE 




SHUTD0WNSYS1 


*em 


OPERATESYSTE 


M 


STARTUPSYST. 


M 



CASE ChosenMethod OF 

Collec torToExchanger : WRITEC'Solar Collector to Exchanger'); 

CollectorToHeatPump : WRITEC'Solar Collector to Heat Pump'); 

TankToExchanger : WRITEC'Tank to Exchanger'); 

TankToHeatPump : WRITEC'Tank to Heat Pump'),* 

HeatedTankToHeatPump: WRITE ( 'Heated Tank to Heat Pump'); 

NoMethod : WRITEC'No heat required')/' 

end; 
writeln; 

WRITELN( ' = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = ='); 

WRITELN; (*uirite a blank line.*) 

end; 

END; C*0perateSystem*) 

PROCEDURE ShutDownSystemCVAR CurrentData: Sy stemDat a) ; 

3EGIN 

WRITELNC':::::::::::::::::::::::::::::::::::::::::::::::::'); 

IF Panic THEN WRITELN ( 'PANIC occurred/ NORMAL shutdown.') 

ELSE WRITELNCNo panic occurred/ ABNORMAL shutdown.'),* 
WRITELNC:: :::::::::::::::::::::::::: :::::::::::::::: : ::::*); 

WITH CurrentData 00 BEGIN 

WRITE('Last chosen heating method was: *); 

CASE ChosenMethod OF 

CollectorToExchangar : WRITECSolar Collector to Exchanger' 
CollectorToHeatPump : WRITECSolar Collector to Heat Pump' 
TankToExchanger : WRITECTank to Exchanger'); 
TankToHeatPump : WRITEC'Tank to Heat Pump*); 
HeatedTankToHeatPump: WRITE (* Heated Tank to Heat Pump')/* 
NoMethod : WRITEC'No heat required'),* 

END," 

writeln; 

WRITELNC 'Thermostat Setting is * , Ther mostatSetting, * C ' ) ,* 

WRITELNC'Inside temperature is * , InsideTemp/ 'C ' ) ; 

WRITELNC'Temperature of collector water is '/CollectorWaterTe 

WRITELNC 'Temperature of tank water is ' / TankWaterTemp/ 'C ' ) ; 

WRITELN C ' Temperature of the heated tank water is "/HeatedTank 

WRITELNC 'Time of day is ', Hour ,':*, Minute ) ; 

WRITELNC Amount of sunlight is ' /AmountOf Sunlight) ; 
END;C*with CurrentData*) 

WRITELNC:::::::::::::::::::::::::::::::::::::::::::::::::: 
WRITELN,* 

WRITELNC'Goodnight, Irene...')," 
END 
END " 
END ,* " 

.C*ShutDownSystem*) 



o; 

Temp/'C); 



OFFSET 
0698H 
044GH 
03E2H 



CODE 
0398H 
0258H 
005EH 



SIZE 
920D 
60CD 
940 



0A30H 26033 0003H 



STACK SIZE 

0010H 16D 

0010H 160 

0010H 16D 

0030H 48D 



125 Lines Read. 

1 Error Detected. 
33% Utilization of Memory. 



Figure 4-6. Listings of Our Test Modules (Cont'd.) 



Summary 

We now have three Pascal-86 modules: MainControl, GetData, and Operation. Two of these 
modules, GetData and Operation, are dummy versions that do not interact with any hardware 
except the Series III system; we will use them for examples in subsequent chapters. The Main- 
Control module can remain unchanged even in our final application. 

The final application will probably use an 8088 processor. In Chapter 5, we show PL/M-86 pro- 
cedures we can use to obtain data from thermocouples via the input/output ports on the 8088. 
Since you probably do not have prototype climate control hardware with an 8088, we will not 
include these procedures in our test versions for execution on a Series III system; never- 
theless, they are good examples of PL/M-86 procedures. 

Our Pascal-86 modules cannot run by themselves on a Series III. Certain built-in procedures 
(like WRITELN and READLN) rely on run-time support software, which consists of public 
modules that contain the software needed to perform console input/output and other opera- 
tions. In Chapter 6, we'll show you how to link the run-time support libraries to these Pascal-86 
modules to make them executable on a Series III system. 
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CHAPTER 5 
PROGRAMMING IN OTHER LANGUAGES 



"It is possible by ingenuity and at the expense of clarity ... [to do almost anything in any 
language]. However, the fact that it is possible to push a pea up a mountain with your nose 
does not mean that this is a sensible way of getting it there." 

—Christopher Strachey 
NATO Summer School in Programming 



The Intellec Series III system also supports PL/M, FORTRAN, and assembly language pro- 
gramming for iAPX 86,88 and 8080/8085 applications. In the previous chapter we used Pascal-86 
for our main control algorithm, but a modular strategy might take advantage of other languages 
for other modules. 

ANOTHER LOOK AT CHOOSING LANGUAGES FOR MODULES 

In the best of all possible worlds, would we all speak the same language? Tower of Babel 
enthusiasts would have us coding our entire program in one language— but which? We do not 
want to return to the stone age and lose cultural variety and language diversity. There are 
expressions that can only be expressed in Chinese characters, and there are problem-solving 
statements that are better expressed in PL/M than in FORTRAN. A good carpenter should 
have more tools than nails and a hammer; a good programmer should be fluent in several pro- 
gramming languages. 

When you design an algorithm, design it using a comfortable language. You will find the 
algorithm easier to debug, and you will notice the paradigm inherent in your design. When you 
are ready to translate your algorithm into code for a computer, use the language best suited for 
the paradigm. 

If you have many algorithms that must work together, you should keep the communication 
among them simple. With simple interfaces, you can code each algorithm in the language best 
suited for the algorithm. In some cases, you can use an algorithm that has already been 
developed for use in another application— another reason for keeping your algorithms and 
interfaces simple. With the Intellec Series III development tools, you can link these algorithms 
in different configurations to form several applications. 

For example, we chose to write our main control algorithm for the climate system in Pascal-86. 
We still need an algorithm for retrieving the data and converting it to Celsius temperatures. We 
decided to write a simple Pascal-86 routine for testing purposes only (this routine only 
retrieves the data from the Series III console); however, our final product will rely on ther- 
mocouples and other sources of data, and we will need an algorithm to convert thermocouple 
voltages to degrees Celsius. Fortunately, we already have a routine in PL/M-86 that performs 
this activity, and we can save development time and money by using it. 
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Chapter 5 

PROGRAMMING IN PL/M-86 

PL/M is renowned for its structure and versatility. PL/M is one of the only structured high-level 
languages that allow you to manipulate bits with AND, OR, and shift (SHR for "shift right" and 
SHL for "shift left") operations. PL/M's data types are not as strictly enforced as 
Pascal's— PL/M's BYTE, WORD (ADDRESS), and POINTER types have loose definitions so 
that you can use them for different kinds of data. For this reason, PL/M is easier to use for 
system programming (designing computer systems or control mechanisms), yet harder to use 
in application programming where enforced data typing makes it easier to write error-free 
programs. 

In our climate control system, there are two routines whose paradigms lend themselves easily 
to PL/M: the routine to get BCD digits from a thermostat device and convert them to a Celsius 
temperature, and the routine to get voltage data from a thermocouple and convert the voltages 
to Celsius temperatures. Figure 5-1 shows the algorithm and the actual PL/M-86 code for the 
routine to retrieve data from a thermostat device. You are already familiar with comments in 
Pascal programs that occur between the (* and *) symbols; in PL/M, comments occur between 
the /* and */ symbols. 

A PL/M typed procedure is like a Pascal or FORTRAN function: it is called in an assignment 
statement (as in X:=FUNCTION(Y)), and it returns a value (X receives the value of 
FUNCTION(Y)). In figure 5-1, the typed procedure THERMOSTAT$SETTING$FROM$PORTS 
returns the value of THERMOSSETTING, which it computes by accessing the two ports 
HIGH and LOW and converting the BCD digits to a Celsius temperature. The value of 
THERMOSSETTING is assigned to ThermostatSetting in the GetData procedure's assignment 
statement: 

The rmostatSetting:=THERM0STAT$SETTING$FR0M$P0RTS(StatPort1, Stat Port2); 



PLMDATA: DO; 

/* This module holds the procedures TH E RMOST AT$S ETT I N G $ F ROMS P0 R T S , 
TEMP$DATA$FROM$PORTS, and INTERPOLATE (a procedure used by 
TEMP$DATA$FROM$PORTS) . These will be used in the final testing 
phase of the climate control system (when prototype hardware is 
available). For intermediate testing (and examples in this book), 
do not use this module; use the dummy GetData module. */ 

/* 

The algorithm for getting a Celsius temperature from a thermostat 

device that can send BCD digits to two ports of the 8088: 

The final version of the GetData procedure (to be 
written in Pascal-86) will use this statement to get 
the thermostat reading: 

ThermostatSetting:=THERM0STAT$SETTING$FR0M$P0RTS(StatPort1 , St at Port 2) ; 

A PL/M-86 typed procedure called THERMOSTATSSETT I NG$F ROMSPORTS 

receives two port numbers from GetData: Stat Port 1 and StatPort2. 
THERMOSTAT$SETTING$FROM$PORTS must access these ports, convert 
the BCD digits to a Celsius temperature, and return the 
temperature . 

Figure 5-1 . The PL/M-86 Typed Procedure THERMOSTAT$SETTING$FROM$PORT S 
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Other Languages 



INPUTS 



THERMOSTAT$SETTING$FROM$PORTS: 

Formal parameters HI6H and LOW receive port numbers as actual 
parameters . 

Input ports HIGH and LOW: Three BCD digits for the thermostat setting: 



Port HIGH, bits 3-0: hundred's digit 
Port LOW, bits 7-4: ten's digit 
Port LOW, bits 3-0: uni t ' s digit 



OUTPUT 



THERMOSTAT$SETTING$FROM$PORTS: Return WORD with Celsius temperature 
*/ 

/•Here is the typed procedure THERMOSTAT$SETTING$FROM$PORTS :*/ 

THERMOSTAT$SETTING$FROM$PORTS: 

PROCEDURE (HIGH, LOW) WORD; 
DECLARE (HIGH, LOW) WORD; 
DECLARE (IN$PORT$HIGH, IN$PORT$LOW) BYTE; 
DECLARE THERMOSSETTING WORD; 
DECLARE (HUNDREDS, TENS, UNITS) BYTE; 

IN$PORT$HIGH = INPUT(HIGH); 

IN$PORT$LOW = INPUT(LOW) ; 

HUNDREDS = IN$PORT$HIGH AND 00001111B; 

TENS = SHR(IN$PORT$LOW, 4); 

UNITS = IN$PORT$LOW AND 00001111B; 

THERMOSSETTING = UNITS + 1 0*TENS + 1 00*HUNDREDS ; 

RETURN THERMOSSETTING; /*t hi s returns the temperature*/ 
END THERMOSTAT$SETTING$FROM$PORTS; 



More procedures fo I low--see figure 5-2. 
Figure 5-1. The PL/M-86 Typed Procedure THERMOSTAT$SETTING$FROM$PORTS (Cont'd.) 



There are notable similarities between Pascal and PL/M. Most notable are the logical struc- 
tures that can occur in both languages— both have the DO WHILE and IF-THEN-ELSE con- 
structs. The languages are lexically and syntactically different in data declarations, procedure 
headings, and other constructs, but they are logically similar. By conforming to a logical struc- 
ture, you make your program readable and easier to debug. 



65 



Chapter 5 



The data declarations in both languages are very similar. In both languages, you must declare 
your data identifiers to be of some type before using the identifiers. In Pascal, you define data 
types or use predefined Pascal data types. In PL/M, you are restricted to the acceptable PL/M 
data types, but they are loosely defined. A BYTE can be any value expressed in eight bits, and 
a WORD in PL/M-86 (ADDRESS in PL/M-80) can be any value expressed in sixteen bits; both 
types of values are treated as unsigned integers. PL/M-86 offers several more types: INTEGER 
(for signed integers), REAL (for floating point numbers), and POINTER (for 8086 and 8088 
addressing). 

PL/M-86 offers many features useful for system programming— arrays and structures, based 
variables, easy type conversion, built-in procedures for manipulating strings, setting and 
disabling interrupts, accessing the 8086 or 8088 hardware stack pointer and base registers, and 
performing bit shift and rotate operations. We use the AND and SHR operators in the 
THERMOSTAT$SETTING$FROM$PORTS procedure in figure 5-1 . 

We also use PL/M-86 procedures to obtain temperature data from thermocouple voltage 
data, the GetData procedure in our GetData module (written in Pascal-86) calls the 
PL/M-86 procedure TEMP$DATA$FROM$PORTS to obtain the temperatures InsideTemp, 
CollectorWaterTemp, TankWaterTemp, and HeatedTankTemp using these assignment 
statements: 

I ns i d eTemp :=TEMP$ DAT A$FR0M$P0RTS( Inside Port 1 , Ins i dePort2) ; 
CollectorWaterTemp:=TEMP$DATA$FR0M$P0RTS(CollectPort1,CollectPort2); 
T an k Wa t erT emp : =T EM PSD AT ASF ROMS PORTS (Tank Port 1 ,TankPort2); 
HeatedTankTemp:=TEMP$DATA$FR0M$P0RTS(HotTankPort1,HotTankPort2); 

In all four assignments, the Pascal-86 identifiers on the left side of the := symbols receive the 
values from the PL/M-86 typed procedure TEMP$DATA$FROM$PORTS. Figure 5-2 shows 
TEMP$DATA$FROM$PORTS. 



/* 

The typed procedure TEMPSDATASFROMSPORTS receives two port numbers: 
HIGH and LOW. These ports are accessed for the binary ADC output 
from a thermocouple device: HIGH gets the high-order 8 bits, and 
LOW gets the Low-order 8 bits. TEMPSDATASFROMSPORTS then uses 
the typed procedure INTERPOLATE, a routine that interpolates a 
Celsius temperature from a thermocouple voltage using two tables. 
TEMPSDATASFROMSPORTS sends a WORD with the input voltage to 
INTERPOLATE. INTERPOLATE returns a Celsius temperature, which 
is returned to the GetData procedure (written in Pascal-86). 

INPUTS 



TEMPSDATASFROMSPORTS: 

Formal parameters HIGH and LOW receive port numbers as actual 
parameters. 

Input port HIGH: Binary ADC output of thermocouple, high-order 8 bits 
Input port LOW: Binary ADC output of thermocouple, low-order 8 bits 

Figure 5-2. The PL/M-86 Typed Procedures TEMP$DATA$FROM$PORTS and INTERPOLATE 
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OUTPUT 



TEMP$DATA$FROM$PORTS: Return WORD with temperature in Celsius 
*/ 

/* INTERPOLATE is declared first, then its calling procedure 
TEMP$DATA$FROM$PORTS is declared. */ 

/* INTERPOLATE is a typed procedure that receives thermocouple 
voltage and returns temperature in Celsius using an 
interpolation routine. * / 

INTERPOLATE: 

PROCEDURE(VOLTSIN) WORD; 

DECLARE VOLTSC*) WORD DATA (0 , 51 , 1 02 , 1 54 , 206 , 258 , 365 , 472) ; 
DECLARE T$CEL(*) WORD DATA (0 , 1 , 20 , 30 , 40 , 50 , 70 , 90) ; 
DECLARE (I, V0LT$IN f NUMERATOR) WORD; 

I = 0; 

IF VOLT$IN = THEN RETURN T $ C E L ( I ) ; 

DO WHILE VOLT$IN > VOLTS(I); 

1=1+1; 
END; 

/* Shift for rounding, and return Celsius temperature */ 
NUMERATOR = SH L ( ( V0LT$ IN-VOLTS ( 1-1 ) ) * (T$CE L ( I ) - T$CE L ( I -1 ) ) , 1); 
RETURN T$CEL(I-1) + SHR (NUMERATOR/ (VO LTS ( I ) - VO LTS ( I -1 ) ) +1 , 1); 

END INTERPOLATE; 

/* TEMP$DATA$FROM$PORTS */ 

TEMP$DATA$FROM$PORTS: 

PROCEDURE(HIGH, LOW) WORD; 
DECLARE (HIGH, LOW) WORD; 
DECLARE IN$PORT$HIGH WORD; 
DECLARE IN$PORT$LOW BYTE; 
DECLARE (THERMOCOUPLE$OUTPUT, TEMPERATURE) WORD; 

IN$PORT$HIGH = INPUT(HIGH); 

IN$PORT$LOW = INPUT(LOW) ; 

THERMOCOUPLE$OUTPUT = SH L ( I N$PORT$H I GH , 8) OR IN$P0RT$L0W; 

TEMPERATURE = INTERPOLATE (THERMOCOUPLESOUTPUT) ; 

RETURN TEMPERATURE; 

END TEMP$DATA$FROM$PORTS; 

Figure 5-2. The PLM-86 Typed Procedures TEMP$DATA$FROM$PORTS 
and INTERPOLATE (Cont'd.) 
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Let's look closely at the following statement, which appears in the procedure 
TEMP$DATA$FROM$PORTS shown in figure 5-2: 

THERMOCOUPLESOUTPUT = S H L ( I N$P0RT$H I G H , 8) OR IN$P0RT$L0W; 

The variable IN$PORT$HIGH was declared as a WORD with 16 bits, and the variable 
IN$PORT$LOW was declared as a BYTE with 8 bits. The thermocouple voltage data from an 
analog-to-digital converter can have up to 13 bits, but our procedure was originally written to 
access 8-bit ports. To assemble the 13 bits, we use the SHL (shift to the left) built-in procedure 
to shift the rightmost 8 bits of IN$PORT$HIGH to the left, and we OR this shifted value with 
IN$PORT$LOW. 

The INTERPOLATE procedure uses a more complicated expression that includes both the SHL 
(shift to the left) and SHR (shift to the right) built-in procedures. The INTERPOLATE procedure 
also uses two tables, or arrays. They are declared in the following statements: 

DECLARE VOLTSC*) WORD DATA ( , 51 , 1 02 , 1 54 , 206 , 258 , 365 , 472 ) ; 
DECLARE T$CEL(*) WORD DATA ( , 1 , 20 , 30 , 40 , 50 , 70 , 90 ) ; 

In both declarations, the arrays VOLTS and T$CEL are assigned actual values through the use 
of DATA initializations. The DATA initialization allocates storage for the array and assigns the 
values specified in parentheses after the word DATA in a single step. 

The values chosen for the VOLTS array are from the National Bureau of Standards; they repre- 
sent the output (in millivolts) of type J thermocouples that corresponds to the Celsius 
temperature range assigned to the T$CEL array. For example, a thermocouple output of 102 
millivolts should correspond roughly to 20 degrees Celsius. The INTERPOLATE procedure 
uses these tables to arrive at an approximate Celsius temperature value for a known ther- 
mocouple output value. Our calculations would be more accurate if the ranges between values 
within each table were smaller. 

Compiling a PL/M-86 program is very similar to compiling a Pascal-86 program. We execute the 
PL/M-86 compiler in the 8086 execution environment by using the Series III RUN command. 
The PL/M-86 compiler is supplied in the file PLM86.86 on the PL/M-86 disk. We inserted a copy 
of this disk into drive 1 (we also put our source program on the same disk). In the following 
example, we execute the PLM86.86 using the RUN command. We do not have to supply the 
".86" extension, since RUN already assumes that the file you specify has that extension. The 
following example shows the RUN command line for compiling the module PLMDATA, which is 
in a source file called PLMDAT.SRC (PLMDAT.SRC and the PL/M-86 compiler are both in direc- 
tory :F1:): 

-RUN :F1:PLM86 : F1 : P LMDAT . S RC CODE LARGE<cr> 

This compiler invocation produces two output files: :F1:PLMDAT.OBJ to hold the compiled 
object module, and :F1 :PLMDAT.LST to hold the listing. The listing is shown in figure 5-3 (in the 
next section). 

Two compiler controls, CODE and LARGE, were also specified. The CODE control tells the 
compiler to list the approximate assembly language instructions that would be necessary to 
implement the PL/M-86 statements— this is useful for many reasons, some of which are 
described in the next section. The LARGE control is needed here because Pascal-86 modules 
are compiled with a default size control that is equivalent to the PL/M-86 LARGE model. All 
modules of a program must conform to the same size control, so our PL/M-86 module must be 
compiled as a LARGE module to conform to the default size of Pascal-86 modules. 
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You need to know more about the PL/M-86 language and compiler than the brief introduction 
provided in this guide. Intel provides a manual for the PL/M-86 language and compiler 
{PL/M-86 User's Guide for 8086-Based Development Systems). Intel also supplies two manuals 
for PL/M-80 program development {PL/M-80 Programming Manual and ISIS-II PL/M-80 
Compiler Operator's Manual) in the 8085 execution environment of the Series III. For tutorial 
information on the PL/M language, see A Guide to PL/M Programming For Microcomputer 
Applications by Daniel McCracken (listed in the Bibliography). 



PROGRAMMING IN 8086/8087/8088 ASSEMBLY LANGUAGE 



So far we have described high-level languages that are translated by compilers into machine 
code; namely, Pascal-86 and PL/M-86. Another high-level language not described in this book 
is FORTRAN, which is also translated by a compiler into machine code. Other high-level 
languages like BASIC-80 are translated by interpreters into machine code. 

An assembly language program is translated into machine code by an assembler. Intel pro- 
vides the 8086/8087/8088 Macro Assembler, which is described in this section, to translate 
8086/8087/8088 Assembly Language programs. It is called a macro assembler because it will 
also translate macro definitions written in the Macro Processor Language, which is described 
with the 8086/8087/8088 Assembly Language. 

The common denominator of all these languages is the machine code, which is the binary 
language of ones and zeros that only the processor can "speak" well. The following is an 
example of machine code, with comments to explain what action each code performs: 



Memory Address 
(Hexadecimal) 



Memory Contents 
(Binary) 



Comments 
(English) 



00000 
00001 
00002 
00003 
00004 
00005 
00006 
00007 



11100101 
00000101 
01000000 
11100111 
00000010 
11101011 
11111001 



Read word into reg. AX... 
...from input port 5. 
Increment contents of AX. 
Write word from reg. AX... 
...to output port 2. 
Repeat by jumping... 
...back seven bytes. 



This machine code (sometimes called object code) is the code that the processor executes. 
All languages are eventually translated into this type of code. 

A program written in assembly language is a symbolic representation of machine code. The 
relation between assembly language instructions and the resulting machine code is usually 
very obvious; the relation between statements in a high-level language and the resulting 
machine code is often not obvious (with some exceptions in the PL/M-86 language). 

Assembly language gives you complete control over the resulting machine code and thereby 
allows you to generate very efficient machine code. There are times when this control is 
desirable, and other times when you want to be free of such details. Most high-level language 
compilers are efficient enough for microcomputer applications; in fact, some compilers are 
more efficient than most humans. 
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Assembly language is the closest language to machine code, but it does allow you to use sym- 
bolic names. Here is a rewrite of the machine code instructions shown before, using 
8086/8087/8088 Assembly Language (comments follow the semicolons): 

CYCLE: IN AX, 5 ;Read word from port 5 into reg. AX. 

INC AX ; Increment the contents of reg. AX. 

OUT 2, AX ;Wn'te word from reg. AX to port 2 . 

JMP CYCLE ; J ump to beginning and repeat. 

This program fragment is simpler to read because it uses symbolic names like CYCLE instead 
of binary and hexadecimal numbers. The 8086/8087/8088 Assembly Language also provides 
sophisticated code and data structuring mechanisms usually found only in high-level 
languages. The assembler enforces some consistency in data types to prevent inadvertent 
errors, yet it also allows some deliberate ways to override data types. 

The 8086/8087/8088 Macro Assembler also processes macro definitions. A macro is a short- 
hand function name for a string of instructions. First you define a macro, using the Macro Pro- 
cessing Language, to be a sequence of assembly language instructions. Once defined, you 
can specify the macro name in an assembly language program, and the macro assembler 
automatically replaces the macro name with the actual sequence of instructions from the 
definition. Using this facility you can create many macros and use them in many programs. 

There are many times when an assembly language version of a routine runs faster and takes 
up less space than a high-level language version. Intel's compilers can produce a listing of the 
assembly language instructions that are approximately the ones you would use to implement 
the compiled high-level language routine in assembly language. For example, we used the 
CODE control in the previous section when we compiled the PL/M-86 program PLMDAT.SRC. 
The CODE control produced the listing shown in figure 5-3. 



PROGRAMMING FOR THE SERIES III ENVIRONMENT 

Assembly language and PL/M give you more direct control over the processor's operation; 
however, the Series III system gives you a set of operating system procedures called 
primitives (or service routines) that your programs can use to perform standard operations. By 
using these primitives, you save development time in two ways: first, you save time by not 
implementing the standard operations yourself; and second, you save time in the future by 
writing programs that will always be compatible with future Intel operating systems. 

In Pascal-86, you are supplied with built-in procedures that automatically call these primitives. 
You link the run-time libraries that contain the primitives to your Pascal-86 modules, and you're 
all set to run the program on a Series III system. The program will also run on future Intel 
operating systems, since the only changes it would need would be contained in the run-time 
libraries; that is, you would have a different set of run-time libraries for each system, but your 
basic program modules would remain unchanged. 

To have this modularity in PL/M or assembly language, you simply use the set of primitives 
described in the inteliec Series ill Microcomputer Development System Programmer's 
Reference Manual, and then link in the appropriate system libraries to your PL/M or assembly 
language modules (as described in the iAPX 86,88 Family Utilities User's Guide). For future 
Intel operating systems, you only need to use a different set of system libraries. Your basic 
program modules would remain unchanged. 

The next chapter describes the linking and locating operations for our Pascal-86 modules. 
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PL/^-86 COMPILER 



ISIS-II PL/M-36 H121 COMPILATION 0= MODULE f>LMDATA 
OBJECT MODULE PLACED IN PLMEX.OBJ 
COMPILER INVOKED 3Y : PLM36 =>LMEX.SRC CODE 



"LMDATA: DC/ - 

/* 

INPUTS 

THERMCSTATSSETTINGSFROMSPORTS: 

Formal parametsrs HIGH and LOW receive port numbers as actual parameters. 

Input ports HIGH and LOW: Three 3CD digits for the thermostat setting: 

Port HIGH/ bits 3-0: hundred's digit 
Port LOW/ bits 7-4: ten's digit 
Port LOW, bits 3-0: unit's digit 

TEMP$DATA$FROM$P0RTS: 

Formal parameters HIGH and LOW receive port numbers as actual parameters. 

Input port HIGH: Binary ADC output of thermocouple/ high-order 8 bits 
Input port LOW: Binary ADC output of thermocouple/ low-order 8 bits 



THERMOSTAT$SETTING$FROM$PDRTS: Return WORD with setting in Celsius 
TEMP$DATA$FROM$P0RTS: Return WORD with temperature in Celsius 



2 1 THERMOST.ATSSETTINGSFROMSPORTS: 

; STATEMENT * 2 
THERMOSTATSETTINGFROMPORTS PROC NEAR 

0000 55 PUSH BP 

0001 8BEC MOV BP/SP 
PROCEDURE (HIGH, LOW) WORD," 

3 2 DECLARE (HIGH/ LOW) WORD; 

4 2 DECLARE ( IN$P0RT$H IGH, IN$PORT$LOW) BYTE; 

5 2 DECLARE THERMOSSETTING WORD/* 

6 2 DECLARE (HUNDREDS/ TENS/ UNITS) BYTE; 

7 2 INSPORTSHIGH = INPUT(HIGH); 

; STATEMENT # 7 
0003 8B5606 MOV DX/ C8P] . HIGH 

0006 EC IN DX 

0007 88060C00 MOV INPORTHIGH/ AL 

8 2 INSPORTSLOW = INPUT(LOW); 

; STATEMENT ft 8 

0008 835604 MOV DX/CBP].L0W 
000E EC IN OX 

00OF 88060D00 MOV INPORTLOW/AL 

9 2 HUNDREDS = INSPORTSHIGH AND 000011113; 

; STATEMENT « 9 
0013 8A060C00 MOV AL/ INPORTHIGH 
0017 80E00F AND AL/OFH 

001A 88060E00 MOV HUNDREDS, AL 

10 2 TENS = SHRdNSPORTSLOW/ 4); 

/' STATEMENT # 10 
001E 8A060D00 MOV AL/INPORTLOW 
0022 B104 MOV CL,4H 

0024 02E8 SHR AL,CL 

0026 88060F00 MOV TENS/AL 

11 2 UNITS = INSPORTSLOW AND 00001 1 1 1 B ; 

; STATEMENT # 11 
002A 8A060D00 MOV AL,INP0RTL0W 
002E 80E00F AND AL/OFH 

0031 88061000 MOV UNITS/AL 



Figure 5-3. Listing of PLMDATA with the CODE Control 
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TMERMQSSETTING * UNITS + 10*TENS + 1 00*HUNDREDS/' 

; STATEMENT # 12 



0035 


8A06QFQ0 


MOV 


AL/TENS 


0039 


81 OA 


MOV 


CU/OAH 


90?8 


P6E1 


MUL 


CL 


0030 


8AOE100D 


MOV 


CL/UNITS 


0041 


B5O0 


MOV 


CH/OH 


0043 


03G1 


ADD 


AX/CX 


0045 


50 


PUSH 


ax ; 1 


0046 


8A060E00 


Moy 


AL/HUNOREOS 


004A 


3164 


MOV 


CU/64H 


004C 


F6E1 


MUL 


CL 


004E 


59 


POP 


ex ; 1 


QQ4F 


03C1 


ADO 


AX/CX 


0051 


89Q60QQ0 


MOV 


THERMOSETTJNG/AX 




return thermosetting; 










; STATEMENT 


0055 


50 


POP 


■3P 


00?6 


C20400 


RET 


4H 



14 2 ENQ THERMOSTAT$SETTING$FR0M$P0RTS; 

1 ; STATEMENT ft 14 

THERMOSTATSETTINGFROMPORTS ENOP 

/* Another typed procedure to return tempsrstgre data/ uihich 
use; t^e INTERPOLATE typed procedure, */ 

/* INTERPOLATE is a typed procedure that receives thermocouple 
VQltage and returns temperature in Celsius using an 
interpolation routine */ 

15 1 INTERPOLATE; 

; STATEMENT # 15 
INTERPOLATE D ROC NEAR 
0059 55 PUSH BP 

Q05A 85EC MQV 3P/SP 
* PR3CEDURE(V0LT$IN) WORD; 

16 2 DECLARE VOLTS(*) WORD DATA (0, 51 / 1 02/1 54/ 206/ 258/ 365/472) ; 
1? 2, DECLARE T$CEL<*> WORD DATA <Q/1 0/ 2Q/3Q/AC/50/7Q/90) ; 

18 2 DECLARE <!/ VOLTSIN/ NUMERATOR) WORD/' 

19 2 I = 0/ 

; STATEMENT U 19 
005C C7Q6Q2QQO0QO MOV I/Oh 

20 2 I? VOLTHNO THEN RETURN T$CEL(I); 

; STATEMENT H 20 
0062 317EQ4Q100 CMP C3P3 . VOLTIN/ 1 H 
0067 7203 JB $+5H 

0069 E90000 JMP 31 

/' STATEMENT # 21 
006C B&QQOO MQV BX/Qh 

006F 01E3 SHL BX/1 

0071 8B87100Q MOV AX/TCELCBX3 

0075 50 POP BP 

0076 C2Q2Q0 RET 2H 

81: ■ 

22 ? 00 WHILE VOLTSIN > VOLTSU); 

.. /' STATEMENT tt 22 
32: 
0Q79 881E0200 MOV pX/I 

0070 Q1E3 SHL BX/1 

007F 884604 MOV AX/ CBP3 . VOLTIN 

0082 3B870000 CMP AX/VOLTSCBXJ 

0086 77Q3 JA $+5H 

0088 E9Q700 JMP S3 

23 3 I = I + 1; 

008B FF06020Q INC I 
?4 3 end; 

008F E9E7FF JMP 32 



STATEMENT M 23 
STATEMENT ft 24 



/* Shift for rounding/ and return Celsius temperature */ 
NUMERATOR ^ SHL, { ( VOLT$ IN^VOLTS ( 1^-1 ) ) * CT$CEL ( I) -T$CE L ( 1-1 ) ) / 1); 

; STATEMENT M 25 



0092 


8B1E02OQ 


MOV 


3X/I 


0096 


48 


DEC 


BX 


0097 


D1E3 


SHL 


BX/1 


0099 


88870000 


MOV 


AX/V0LTS r 3X] 


0090 


8B4E04 


MOV 


CX/CBP3. VOLTIN 


OOAO 


2BC8 


SUB 


CX/AX 


00A2 


8B360200 


MOV 


SI/ I 


00A6 


D1E6 


SHL 


SI/1 



Figure 5-3. Listing of PLMDATA with the CODE Control (Cont'd.) 
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00A8 


8B971000 


MOV 


DX/TCELC8X] 


OOAC 


8B9C1000 


MOV 


BX/TCeiCSIl 


0080 


2B0A 


SUB 


BX/OX 


00B2 


50 


PUSH 


ax ; 1 


0063 


89C8 


MOV 


AX/CX 


OOBS 


52 


PUSH 


ox ; 2 


00B6 


F7E3 


MUL 


3X 


00B8 


01E0 


SHL 


AX,1 



OOBA 89060400 MOV NUMERATOR, AX 

RETURN T$CEL(I-1) ♦ SHR ( NUMERATOR/ (VOLT S ( I > -VOLTS < 1-1 )) *1 / 

; STATEMENT H 26 



OOBE 


889C0000 


MOV 


BX/VOLTSCSi: 


00C2 


5A 


POP 


DX 


; 2 


00C3 


59 


POP 


CX 


; 1 


00C4 


2B09 


SU3 


BX,CX 




00C6 


52 


PUSH 


OX 


; 1 


00C7 


3102 


XOR 


DX/DX 




00C9 


F7F3 


OIV 


BX 




OOCB 


40 


INC 


AX 




OOCC 


01E8 


SHR 


AX,1 




OOCE 


59 


POP 


CX 


; 1 


OOCF 


03C1 


ADD 


AX,CX 




00D1 


50 


POP 


BP 




0002 


C20200 


RET 


2H 




END interpolate; 






; s 




INTERPOLATE 


ENDP 



STATEMENT « 27 



28 1 TEMP$DATA$FROM$PORTS: 

; STATEMENT # 28 
TEMPOATAFROMPORTS PROC NEAR 
00D5 55 PUSH BP 

0006 8BEC MOV BP/SP 

PROCEDURE(HIGHsLOW) WORD/* 

29 2 OECLARE (HIGH/LOW) WORD/' 

30 2 OECLARE IN$PORT$HIGH WORD; /* ADDRESS in McCracken 

31 2 DECLARE IN$PORT$LOW BYTE,* 

32 2 DECLARE (THERM3C3UPLES0UTPUT, TEMPERATURE) WORD/* 

33. 2 IN$PORT$HIGH = INPUT(HIGH); 

00D8 8B5606 

OODB EC 

OOOC B400 

OODE 89060600 

34 2 INSPORTSLOW = INPUT(LOW); 

,* STATEMENT U 34 
00E2 8B5604 MOV DX,C3P:j.L0W 

00E5 EC IN OX 

00E6 88061100 MOV INPORTLOW,AL 

35 2 THERMOCOUPLESOUTPUT = SHL C INSPORTSHIGH, 8> OR IN$PORT$LOW; 

; STATEMENT # 35 

OOEA 88060600 MOV AX, INPORTHIGH 

OOEE B108 MOV CL,8H 

OOFO D3E0 SHL AX,CL 

00F2 8A0E1100 MOV CL,INPORTLOW 

00F6 B500 MOV CH/OH 

00F8 0BC1 OR AX,CX 

OOFA 89060800 MOV THERMOCOUPLEOUTPUT/ AX 

36 2 TEMPERATURE = INTERPOLATE (THERMOCOUPLESOUTPUT) ; 

; STATEMENT U 36 
OOFE 50 PUSH AX ; 1 

OOFF E857FF CALL INTERPOLATE 

0102 89060A00 MOV TEMPERATURE/ AX 





; STATEMENT # 33 


MOV 


DX/CBP].HIGH 


IN 


OX 


MOV 


AH, OH 


MOV 


INPQRTHIGH/AX 



RETURN TEMPERATURE/" 



STATEMENT # 37 



0106 8B060A00 MOV AX, TEMPERATURE 
010A 50 POP 3P 

010B C20400 RET 4H 

END TEMP$DATA$FROM$PORTS; 

; STATEMENT * 38 
TEMPDATAFROMPORTS ENDP 



END plmdata; 



STATEMENT # 39 



MOOULE INFORMATION: 



CODE AREA SIZE 


s 


010EH 


2700 


CONSTANT AREA SIZE 


= 


0020H 


320 


VARIABLE AREA SIZE 


= 


0012H 


18D 


MAXIMUM STACK SIZE 


= 


0010H 


160 


95 LINES READ 








PROGRAM ERROR(S) 









END OF PL/M-86 COMPILATION 



Figure 5-3. Listing of PLMDATA with the CODE Control (Cont'd.) 
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CHAPTER 6 

USING UTILITIES TO PREPARE 

EXECUTABLE PROGRAMS 



"Three things are to be looked to in a building: that it stand on the right spot; that it be securely 
founded; that it be successfully executed." 

— Johann Wolfgang Von Goethe 



You must do three things to prepare and execute programs successfully: link program 
modules to resolve external references, locate the linked modules by binding them to memory 
addresses, and run the program in the appropriate operating environment. 

These things are easy to do for most high-level language programs. Easy-to-use utility pro- 
grams perform these operations for you. They are also flexible enough to allow you to perform 
more complicated linking and locating operations for programs that refer to physical memory 
addresses. The compilers for high-level languages usually produce programs that do not refer 
to physical memory addresses; these programs can be linked and located in one easy step. 

The diagram in figure 6-1 shows the process of linking and locating (binding to addresses) 
modules to prepare a program that can be RUN on the Series III system (or debugged via 
DEBUG-86, described in Chapter 7). 



MODULES CONTAINED 

IN RUN-TIME 

AND 

USER'S LIBRARIES 




OBJECT MODULES 
FROM COMPILERS 
OR ASSEMBLERS 


i 


' 




i 


' 



LINK 86 
(DEFAULT) 




LINK86BIND 
(WITH BIND 
CONTROL) 


1 


' 








LOC86 






i 


' 




i 


i 



DEBUG-86 RUN 

Figure 6-1. Using Utilities to Prepare Executable Programs 
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CHAPTERS 

PREPARING A LIBRARY OF PROGRAM MODULES 



A library is any collection of public modules— modules that contain public procedures that can 
be used by programs. Some libraries are supplied by Intel; for example, the run-time system 
used with Pascal-86 programs is supplied as several library files. Pascal-86 has a number of 
built-in procedures that you can use in any Pascal-86 program— these procedures can be 
found in the supplied run-time libraries. To use any of the built-in procedures, you must link 
the run-time libraries to your program modules using the LINK86 utility. 

You can also build your own library files using the LIB86 utility. With the LIB86 utility you can 
create a library, add modules from another library, add new modules, delete modules in a 
library, and list the names of modules in a library. 

The following example shows a session with LIB86. We create a new library called TONY. LIB, 
and then we ADD to it some of the modules from a supplied run-time library called P86RN2.LIB. 
We then LIST the modules in TONY. LIB, and EXIT from the LIB86 utility: 

-RUN LIB86<cr> 

SERIES-HI 8086 LIBRARIAN V1.0 

*CREATE : F1 :T0NY. LI8<cr> 

*ADD : F1 :P86RN2. LIBCMO'DI , M0D4, MOD?) TO : F 1 : TON Y . L I B <c r> 

♦LIST : F1 :T0NY. LIB<cr> 

TONY. LIB 

M0D1 

M0D4 

M0D7 
*EXIT<cr> 



The linker (LINK86) treats library files in a special way. As shown in the next section, you 
specify your program modules first in the LINK86 command line, then you specify the 
appropriate libraries. You must be sure to link these modules in the proper sequence. 

Why? Remember that your program's main module refers to procedures that exist only in 
other modules— external procedures. The linker must be able to find the external procedures. 
LINK86 remembers the references to external procedures in the first module, and looks in the 
subsequent modules for those external procedures. If it cannot find the external procedures in 
subsequent modules (maybe because you erroneously specified the library before specifying 
the program modules in the LINK86 command line), LINK86 will generate an error message. 

The built-in procedures supplied with Pascal-86 (READLN, WRITELN, etc.) are external pro- 
cedures contained in the modules included with the run-time support libraries. LINK86 will first 
see the reference to these procedures in your program modules, and then it will look in the 
libraries for the modules that will satisfy those references. LINK86 will only link in those 
modules that are needed to satisfy external references; it will not link in the entire library of 
modules unless your program modules refer to all of the library modules. 

Since you do not need to use LIB86 to handle run-time libraries supplied with Pascal-86, you 
only need LIB86 to handle your own libraries. Why would you set up your own libraries? To 
manage sets of repetitive modules. In many software development labs, modules useful to 
many different programs would either be lost or repeated. Libraries are sets of modules that 
are easily maintained through use of the LIB86 librarian. The LINK86 utility is capable of 
searching such a library and only checking out the modules needed for the linked program. 
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LINKING MODULES TO FORM A LOCATABLE PROGRAM 



Most modular programs have a main module that calls procedures in other subordinate 
modules. Although a subordinate module can call a procedure in the main module, most calls 
are from the main module to a subordinate module, and the modular structure resembles an 
upside-down tree, as shown in figure 6-2. We included the run-time system modules in this 
tree, since the program modules rely on the built-in procedures and operating environment 
calls found in the run-time system. 

When you link these modules together using the LINK86 utility, you allow LINK86 to see the 
main module first, because the main module is the most abstract; that is, it has the highest 
level of abstraction, and it calls procedures in lower levels to perform each activity. You should 
then allow LINK86 to see the next subordinate level of modules, and so on. 

The last group of modules for LINK86 should be any run-time system libraries that are needed 
to perform the built-in procedures (READLN, WRITELN, etc.). The run-time system libraries 
contain modules that are at the lowest level of abstraction— these are the modules that call 
procedures in the operating environment of your system (the operating environment is usually 
invisible to you, but not to your Pascal program). 



For an example, we will link together the modules needed to test our main program in the 
Series III environment. We start with our main module MAIN. OBJ, which holds the MainControl 
module. We link to it the test versions of the modules GetData found in DUMDAT.OBJ, and 
Operation found in DUMOP.OBJ. Finally, we link in the modules we need from the run-time 
system libraries P86RN0.LIB, P86RN1.LIB, P86RN2.LIB, P86RN3.LIB, 87NULL.LIB, and 
LARGE.LIB (we explain these libraries after the example): 



-RUN LINK86 : F1 :MAIN. OBJ , :F1:DUMDAT. OBJ, : F1 : DUMOP.OBJ 
>>:F1 : P86RN0 . LIB, : F1 : P86RN1 .LIB, : F1 :P86RN2.LIB,&<cr> 
>>:F1:P86RN 3.LIB f :F1:87NULL.LIB,:F1:LARGE.LIB&<cr> 
>>T0 : F1 :PR0GRM.86 BIND<cr> 



i<c r> 



Let's explain this example. We used the RUN command to run the LINK86.86 utility in the "8086 
side" of the Series III. We specified the three object modules of our program, and then we 
specified all of the run-time libraries needed to run our program in the Series III environment. 
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Figure 6-2. Main Module with Subordinate Modules 
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We directed the output to a file called PROGRM.86. Finally, we specified the BIND control in 
order to make PROGRM.86 an LTL (load-time locatable) program. The BIND control is the 
easiest way to make a program locatable in the Series III environment (more on BIND in the 
next section). PROGRM.86 can now be loaded and executed (via the RUN command) in the 
Series III system. 

The run-time system libraries P86RN0.LIB and P86RN1.LIB are required for any Pascal-86 pro- 
gram that needs run-time support. The libraries P86RN2.LIB and P86RN3.LIB are required for 
any Pascal-86 program that uses the file input/output procedures and other operations per- 
formed by the operating system. The 87NULL.LIB is needed for programs that do not use 
either the 8087 processor or emulator to perform real arithmetic. Since our program has no 
REAL data types, it does not perform real arithmetic; therefore, it needs the 87NULL.LIB 
library (if it did perform real arithmetic, it would need other libraries). Finally, to run any 
Pascal-86 program on the Series III system, you need to link the LARGE. LIB library to the pro- 
gram. The LARGE. LIB library contains the primitives (service routines) used to perform opera- 
tions in the Series III environment. 

The run-time system is separated into several libraries so that you can customize your run- 
time environment if you so wish. The libraries described above are the default libraries used to 
run programs on the Series III system, if your programs do not use REAL data types. If your 
programs use REAL data types, you would not use 87NULL.LIB; instead, you would use the 
8087 processor with the library 8087. LIB, or the 8087 software emulator with the libraries E8087 
and E8087.LIB. Consult the Pascal-86 User's Guide for specific information about the run-time 
system libraries. 



LOCATING AND RUNNING PROGRAMS 

A program must reside in actual memory before it can run. The locating process assigns actual 
(physical) memory addresses to a program. There are two ways to accomplish the locating 
process: 

1. Using LINK86 with the BIND control to produce an LTL module (discussed in the next 
paragraph), which can be located, loaded, and executed automatically by the RUN 
command 

2. Using LINK86 (without the BIND control) to produce a linked module, then LOC86 to locate 
the module in an area of memory you specify, and finally RUN to load and execute the 
program 

The simplest locating operation involves using the LINK86 utility with the BIND control, as 
shown in the previous example. This simpler process, called binding, binds modules to logical 
segments, which can be located in actual memory by the RUN command in one fast step. 
Modules produced by the LINK86 utility with the BIND control are called load-time locatable 
modules (LTL modules). An LTL module is a module that can be located almost anywhere in 
memory, and so the RUN loader can easily locate it in the Series III environment for you. The 
DEBUG-86 debugger can also locate an LTL module for you, as we will show in the next 
chapter. 

For example, our LINK86 example in the previous section bound the modules properly to form 
the program PROGRM.86. Now, in one step, you can locate this bound program in actual 
memory, load it into memory, and execute it in the "8086 side" (8086 execution mode) of the 
Series III system by using the RUN command: 

-RUN :F1 :PR0GRM<cr> 
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Note that we did not type PROGRM.86, only PROGRM. The RUN loader looks for the ".86" 
extension automatically, unless you specify another extension or a period at the end of the 
name (the period signifies no extension). 

High-level language programmers usually do not burden themselves with more details about 
locating programs. However, assembly language programs and some PL/M programs fre- 
quently refer to physical addresses rather than symbolic (logical) addresses. These program 
modules are called absolute modules because they use absolute physical addresses. 
Absolute modules cannot be located automatically by the RUN command— they must be 
relocated first by the LOC86 utility. 

There is a case when even the simplest program must be located by LOC86: if you intend to 
debug your program using an ICE-86 or ICE-88 emulator, you must locate the program with 
LOC86 to make it an absolute module. The ICE (In-Circuit Emulation) loaders can only load 
absolute modules. 

For an example, we will link our new PL/M-86 module PLMDAT.OBJ to our program, along with 
another version of our GetData module in DATA. OBJ, and produce the linked module 
MAIN.LNK: 

-RUN LINK86 :F1:MAIN.0BJ, :F1: DATA. OBJ,: F1:PLM DAT. OBJ, &<cr> 
>>:F1:DUMOP.OBJ,:F1:P86RNO.LIB,:F1:P86RN1.LIB,:F1:P86RN2.LIB,&< cr> 
>>:F1 :P86RN3. LIB, :F1 :87NULL. LIB, : F1 : LARGE. LIB <cr> 

Since we did not specify a new filename with a "TO" clause, the LINK86 utility directed the 
linked output to the file :F1:MAIN.LNK (LINK86 takes the name of the first object module 
MAIN. OBJ, and changes its extension to LNK to make MAIN.LNK). Now we are ready to locate 
:F1 -.MAIN.LNK with the LOC86 utility: 

-RUN L0C86 :F1:MAIN.LNK TO : F1 : PROGRM . 86 RESERVEC200H TO 77FFHXcr>. 

We used the RESERVE control with LOC86 to reserve an area of memory for the Series III 
operating system. LOC86 will not locate any program segments in the area between addresses 
200H and 77FFH ("H" is for hexadecimal). You must leave room for the Series III operating 
system to execute programs in the Series III environment. 

The LINK86, LOC86, and LIB86 utilities are described in detail in the iAPX 86,88 
Family Utilities User's Guide for 8086-Based Development Systems. This manual 
describes all of the utilities for iAPX 86 or iAPX 88 applications development. 
These utilities are designed to be used in 8086-based development systems like 
the Series III. 

We can now RUN our program on the Series III system: 

-RUN PR0GRM<cr> 

Climate system is now on. 

Type the thermostat setting in degrees Celsius:24<cr> 

Type the inside temperature reading in Celsius:21<cr> 

Type the temperature of the collector water in Celsius: 60<cr> 

Type the temperature of the tank water in Celsius:60<cr> 

79 



CHAPTER 6 



Type the temperature of the heated tank water in Celsius:70<c.r> 

Type the hour of day, as in 04 or 24:13<cr> 

Type the minute of the hour, as in 01 or 59:25<cr> 

Type the amount of sunlight, any integer will do for now:1<cr> 



CURRENT DATA IS AS FOLLOWS: 



Thermostat Setting is 24C 
Inside temperature is 21 C 
Temperature of collector water is 60C 
Temperature of tank water is 60C 
Temperature of the heated tank water is 70C 
Time of day is 13:25 
Amount of sunlight is 1 



The Climate System is now operating. 

The time is 13:25 

The inside temperature is 21 C 

The thermostat setting is 24 C 

Method chosen to heat the building: Solar Collector to Exchanger 



No panic occurred, ABNORMAL. shutdown. 

Last chosen heating method was: Solar Collector to Exchanger 

Thermostat Setting is 24C 

Inside temperature is 21 C 

Temperature of collector water is 60C 

Temperature Of tank water is 60C 

Temperature of the heated tank water is 70C 

Time of day is 13: 25 

Amount of sunlight is 1 



Goodni gh t , I rene . . . 



What happened!? Our program stopped with an abnormal shutdown! It had no trouble picking 
the right heating method; however, something caused the variable Operating to become 
FALSE, without setting Panic to TRUE. We will have to debug the program in the next 
chapter... 
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"Appearances are often deceiving." —Aesop 



We have written program modules and they compiled correctly. We used the LINK86 utility with 
BIND to link the modules into a program and prepare it for execution. By all appearances, it 
looks like it will work as planned. 

However, when we loaded and executed (via the RUN command) the program, something 
mysterious happened— the "hidden glitch" struck! 

We now have to debug our program— find all of the "hidden glitches" and fix them. Debugging 
is so essential to programming that in most software development efforts, more time is alotted 
to debugging than to any other activity. 

Debuggers are programs that monitor a program's execution and allow you to stop execution 
and check details. Usually a debugger is part of an execution vehicle— a piece of hardware 
your program executes on, or a piece of software your program executes in. The debugger 
monitors the activity in the execution environment. 

For example, the Series III provides two execution environments or execution vehicles: the 
8085 execution mode and the 8086 execution mode. To debug programs that run in the 8085 
execution mode, you type the DEBUG command on the "8085 side" (8085 execution mode) to 
start the Monitor. To debug programs that run in the 8086 execution mode, you RUN the 
DEBUG command on the "8086 side" (8086 execution mode) to start the DEBUG-86 debugger. 
Both debuggers reside in ROM. 

With a debugger you can load and execute a program (rather than using RUN), and stop the 
execution to check the values of variables, the contents of registers, and other details. You 
can also change such values, and perform other activities that monitor a program's execution. 
You can even execute your program one step at a time. 

Since the Monitor (for 8085 execution mode) is described in several Intel documents 
(McCracken's Guide to Intellec Microcomputer Development Systems and the Intellec Series 
III Microcomputer Development System Console Operating Instructions), we will devote this 
chapter to describing DEBUG-86 and the ICE-88 emulator (a version of the IGE-86 emulator) for 
debugging programs in the 8086 execution mode for iAPX 86, 88 applications. 
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USING DEBUG-86 FOR SYMBOLIC DEBUGGING 

Debuggers are useful because they load and execute a program for you, and they allow you to 
stop execution at any point you specify. If you are an assembly language programmer, your 
program directly uses registers and memory locations; you would want to check the contents 
of these registers and memory locations. If you are a high-level language programmer (PL/M, 
Pascal, FORTRAN, etc.), you do not directly refer to registers and memory locations; you 
would rather check the values of your variables, or symbols. 

For example, we know we have a problem with our program: the variable Operating should 
always have the boolean value of TRUE as long as Panic is FALSE. If Panic is set to TRUE, 
Operating should then become FALSE; however, Operating is somehow set to FALSE while 
Panic remains FALSE. During the execution of our program, we should be able to stop execu- 
tion and check the value of Operating. 

One way to do this is to find the address of Operating and check its contents. A better way 
would be to simply ask for the value of Operating in a command such as: 

• BOOLEAN BYTE . . MA I N CONTRO L . OPER AT I N6<c r> 
FALSE 

In DEBUG-86, you can execute our program and stop its execution anywhere. You can then 
use the above command to find the boolean (true or false) value of Operating without knowing 
where Operating is located. 

In our program there is only one symbol named Operating. If there were more than one, we 
would specify the symbol by specifying both the module name and the symbol name (e.g., 
..MAINCONTROL.OPERATING), as we did in the above example. We would have obtained the 
same result by specifying only ".OPERATING". You use two periods as a prefix to module 
names, and one period as a prefix to symbol names. 

To do symbolic debugging using the symbols in your program, you must compile your program 
using the DEBUG compiler control (see Chapter 4 for the Pascal-86 compiler, and Chapter 5 for 
the PL/M-86 compiler). The DEBUG compiler control produces a symbol table for your pro- 
gram, which can be loaded by DEBUG-86. If you do not use the DEBUG compiler control while 
compiling, you can still do symbolic debugging by defining all of your symbols from within 
DEBUG-86. 

To invoke DEBUG-86, use the following command: 

-RUN DEBUG<cr> 
DEBUG 8086, V1 .0 



DEBUG-86 is now in control, as shown by the asterisk (*) prompt. You can now type DEBUG-86 
commands. To load PROGRM.86 and its symbol table, type the following command: 

•LOAD :F1 : PROGRM . 86<c r> 

You can check the symbol table by typing the SYMBOLS command: 

*SYMBOLS<cr> 
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The symbol table contains each module name and symbol name, with their addresses. You 
can find the address of a single symbol by typing the name of the symbol. For example, we 
want to know the address of the call (in module MalnControl) to the procedure OperateSystem 
(which is in the module Operation): 

*..MAINCONTROL.OPERATESYSTEM<cr> 
..MAINCONTROL.OPERATESYSTEM=0481:06CCH 

DEBUG-86 knows where to start executing the program by looking at the contents of the CS 
and IP (CS:IP) registers. The CS register holds the starting address of the program's code seg- 
ment, and the IP register holds the address within the code segment where the program 
should start execution. CS and IP change as the program executes; therefore, to preserve the 
starting location of the program, we create a new symbol called .START to hold the starting 
address: 

♦DEFINE .START=CS:IP<cr> 

We could also check the contents of CS:IP: 

*CS<cr> 
CS=0481H 
*IP<cr> 
IP=0FD6H 

You should familiarize yourself with addresses. The 8086 and 8088 processors use 20-bit 
physical addresses separated into two words: the segment base address and the offset value. 
The CS register holds the code segment base address, and the IP register holds the offset 
value. All addresses are in hexadecimal notation (the "H" stands for hexadecimal). All 
addresses are displayed with the segment base, followed by a colon, followed by the offset. 

The EVALUATE (abbreviated "EVA") command is useful for evaluating numeric and character 
values and addresses. For example, the number 4142H can be represented in several ways: 

*EVA 4142<cr> 

1000001010000Y 40502Q 16706T 4142H 'AB' 

When you type a number by itself, DEBUG-86 assumes the number is in hexadecimal notation. 
The number 4142H is equivalent to the decimal number 16706 ("T" denotes decimal notation), 
the octal number 40502Q ("Q" denotes octal notation), the binary number 1000001 01 0000 Y ("Y" 
denotes binary notation), and the ASCII characters "AB" (41 H is the ASCII code for "A" and 
42H is the ASCII code for "B"). 

The EVA command will also find the closest symbol that has the address you specify. The 
keyword SYM tells the EVA command to evaluate the address symbolically: 

*EVA 481 :6CC SYM<cr> 
..MAINCONTROL. OPERATESYSTEM 

We will now execute our program and stop its execution before it executes the OperateSystem 
procedure. The GO command will start executing at the beginning of the program, which it 
knows by looking at the CS and IP registers (CS:IP). You could specify an actual address with 
GO to start from, or the line number of a program statement, or a statement label; however, we 
do not use statement labels in our program. We want our program to stop while it is executing 
the main (WHILE Operating) loop, not at the start of the OperateSystem procedt e in the 
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Operation module (since procedure definitions do not actually execute). Our program will GO 
until it reaches the starting address, in the MainControl module, of the call to the 
OperateSystem procedure: 

*G0 TILL . .MAINCONTROL. OPERATES YSTENKc r> 
Climate System is now on. 



During execution, we type in the 
temperatures and other data. The program 
stops and DEBUG-86 displays the next 
i nstruct ion .to be executed (in assembly 
language form). 



0481:06CCH PUSH BP 



At this point, we can check the boolean values of both Panic and Operating: 

**B00L BYTE .PANIC<cr> 

FALSE 

*B00L BYTE . 0PERAT IN6<c r> 

FALSE 

To make sure the program stopped at the right place, we evaluate the CS and IP registers 
symbolically: 

*£VA CS:IP SYM<cr> 

. .MA IN CONTROL. OPERATESYSTEM 

Another useful DEBUG-86 command is the STEP command. From any point of program execu- 
tion, you can execute the program step by step— one machine instruction at a time. The STEP 
command also displays the next machine instruction to be executed. This display is in 
"disassembled" form— the machine instruction is translated back into assembly language: 

*STEP<cr> 

04.81 :06CDH MOV BP,SP 

* 

STEP executes one machine instruction and displays 
the next one disassembled. Another STEP would 
execute the displayed instruction. 

We will now change the value of Operating to be TRUE. A boolean variable is TRUE if its 
numeric value is odd; FALSE if its numeric value is even. Why? Because a boolean is TRUE if 
its rightmost bit (in a binary representation) is 1, and FALSE if its rightmost bit is 0. All even 
values written in binary form end with a in the rightmost bit, and all odd values written in 
binary form end with a 1 . 

To change the value of Operating, we must also specify BYTE, since it is only one byte long: 

*BYTE .0PERATIN6 = Kcr> 
*B00L BYTE . OPERAT I N6<c r> 
TRUE 
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We can now continue execution with a GO command: 
*G0<cr> 
The Climate System is now operating. 



Execution continues correctly, and the 
program Loops back to the GetData 
procedure to obtain more data. As He 
continue execution, t he p rog ram once 
again erroneously changes Operating 
to FALSE. 

We can use our .START symbol to start execution once again at the beginning of the program: 

• GO FROM .START TILL . . M A I N CONTRO L . OPER AT E S Y ST EM<c r> 

After repeating these debugging operations, we are sure that our error occurred at the state- 
ment where Operating is set to FALSE while Panic is set to TRUE. 

Refer to the listing in Chapter 4. The Pascal-86 statement numbers are in the "STMT" column 
of the listing. The "LINE" column shows the source file line numbers (you can use the line 
numbers with CREDIT to display, edit, move, or copy particular lines). 

Between statements 37 and 40 (source lines 68 and 70), we have an ELSE clause that should 
only execute if the temperatures are not greater than the minimums necessary to heat the 
building. Panic should be set to TRUE and Operating should be set to FALSE, if this ELSE 
clause executes. 

However, the "ELSE Panic:=TRUE" is not executing, but the "Operating:=FALSE" is always 
executing! The error is one of omission: to have two statements execute as part of an ELSE 
clause, they must begin with BEGIN and end with END, as shown: 

ELSE BEGIN 

Panic:=TRUE; Op*e*&a t i ng : = F A LSE ; 
END; 

To make this change, we must re-edit MAIN. SRC, re-compile MAIN. SRC to obtain 
a new MAIN. OBJ, and re-link the modules using LINK86 (with BIND, as shown in 
Chapter 6). Figure 7-1 shows the revised listing, with the corrected ELSE clause 
shaded, and a sample run of the program. 

SERIES-III Pascal-36/ XD31 09/01/30 PAGE 1 

MAINC0NTR3L 

Source »=ile: :F1 :MAIN.SRC 
Object File: : C 1:MAIN.0BJ 
Controls Specified: 0E5UG. 

STMT LINE NESTING SOURCE TEXT: : F 1 : M AI N . SRC 

1 10 MODULE MainControi; 

2 2 

(* Interface specification common to all modules *) 

$INCLUDE(:M -.INSPEC.SRC) 
=1 PU3LIC MainControi; (*section of interface specification*) 

Figure 7-1. Climate Control Program Listing and Sample Run 
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CONST ^declarations declared publicly in this module*) 



Minim 
Minim 



m p orExchanger 
mForHeatPump 



35;(*degrees Celsius*) 

13; 



TYPE <*def initions publicly defined in this module*) 

AirTemperature =-20. . 1 20; (*degrees in Celsius*) 
WaterTemperature =0.-1 20; 
HeatingMethods =(CollectorToExchanger, 

CollectorToHeatPump, 

TankToExchanger, 

TankToHeatPump, 

HeatedTankToHeatPump/ 

NoMathod); 



SystemData 



= RECORD 

ChosenMethod 
InsideTemp/ 
ThermostatSetting 
CollectorWaterTemp, 
TankWaterTemp/ 
HeatedTankTemp 
AmountOf Sunlight 
Hour 
Minute 
END (*SystemData*); 



: HeatingMethods; 
: AirTemperature; 



: WaterTemperature; 

: Integer; 

: 00. .24; 

: 00. .59; 



VAR (*variables publicly defined in this module.*) 



CurrentData 
Operating* Panic 



: SystemData; 

: boolean; 



PUBLIC GetData; (*Get0ata Module containing GetData & StoreData*) 

PROCEDURE GetData(VAR CurrentData : SystemData) ; 
PROCEDURE StoreData(VAR CurrentData: SystemData) ; 

PUBLIC Operation; (*0peration Module containing OperateSystem, 
StartUpSystem and ShutDownSystem*) 
PR0CE0URE StartUpSystem; 

PR0CE0URE OperateSystemCVAR CurrentData : SystemData) ; 
PROCEDURE ShutDoiunSystem(VAR CurrentData: SystemData) /* 

PROGRAM MainControK INPUT, OUTPUT); 
(* end of interface specification *) 
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PROCEDURE DetermineMethod(VAR CurrentData : SystemData); 
BEGIN 

WITH CurrentData DO 
3EGIN 

IF InsideTemp<ThermostatSetting THEN 
BEGIN 

IF CollectorWaterTemp>MinimumForExchanger THEN 

ChosenMethod: =CollectorToExchanger 
ELSE IF CollectorWaterTemp>MinimumForHeatPump THEN 

ChosenMethod: =CollectorToHaatPump 
ELSE IF TankWaterTemp>MinimumForExchanger THEN 

ChosenMethod :=TankToEx changer 
ELSE IF TankWaterTemp>MinimumForHeatPump THEN 

ChosenMethod: =TankToHeat Pump 
ELSE IF HeatedTankTemp>MinimumForHeatPump THEN 
ChosenMethod :=HeatedTankToHeatPump 

$£$£.:•:?! 6&i»ry 

'-' •##«$€ * *TRU t; . Op itr» ti no.:** A L$S ? 
stop- 

END 
ELSE (*no heating request*) ChosenMethod : =NoMethod 
END/' (*With CurrentData*) 
END; (*DetermineMethod) 

(***•*•*•***.*** MAIN PROGRAM ************•**********•************) 

3EGIN 

StartUpSystem; 
3perating:=TRU5; 
Panic:=FALS=; 

WHILE 0per?ting DO (*while system is operating/ do:*) 
5E3IN 

GetData(CurrentData); <*Get the temps, time, etc.*) 
StoreData(CurrentData) / (*Store this data as record*) 
DetermineMethod(C urrentData) ; (*this detects a panic*) 
Opera teSy stem C Cur r en tOata ) ; 
END; (*uuhile operating*) 
ShutDouinSystem(CurrentData); 
END. (*Main Control Algorithm*) 



Figure 7-1. Climate Control Program Listing and Sample Run (Cont'd.) 
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Summary Information: 



PROCEDURE 
DETERMINEMETHOO 



OFFSET CODE SIZE 
301 1 H 003FH 1 43D 



DATA SIZE STACK SIZE 
0006H 60 



3273 0016H 



°6 Lines Read. 
Errors Detected. 
33% Utilization of Memor 



SERIES-III Pascal-36/ X031 



Source File: : F1 :DUMDAT . SRC 
Object File: : F1 : DUMDAT .OB J 
Controls Specified: DE3UG. 



STMT LINE NESTING 
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SOURCE TEXT: : c 1 : DUMDAT . SRC 

(*This is a dummy GetData module/ with dummy GetData 
and StoreData procedures/ for use with MainControl 
module in testing phases. It only performs console 
input to get Celsius temperatures/ the time of day/ 
and the amount of sunlight (insolation) for the 
solar collector. Use PLM86SDATA module for real 
application.*) 

MODULE GetData; 

(* Interface specification common to all modules *) 

$INCLUDE(:F1 :INSPEC.SRC) 

PUBLIC MainControl; (*section of interface specification*) 

CONST (*declarations declared publicly in this module*) 



MinimumForExchanger 
MinimumForHeatPump 



= 35/"(*degrees Celsius*) 
= 13; 



TYPE (*def initions publicly defined in this module*) 

AirTemperature =-20 . . 1 20; (*degrees in Celsius*) 
WaterTemperature =0..120; 
HeatingMethods =(CollectorToExc hanger/ 

CollectorToHeatPump/ 

TankTocxchanger/ 

TankToHeatPump/ 

HeatedTankToHeatPump/ 

NoMethod) ; 



SystemData 



RECORD 

ChosenMethod 

InsideTemp/ 

ThermostatSetting 

CollectorWaterTemp/ 

TankWaterTemp/ 

HeatedTankTemp 

AmountOf Sunlight 

Hour 

Minute 

END (*SystemData*); 



: HeatingMethods; 
: AirTemperature; 



: WaterTemperature; 

: Integer; 

: 00. .24; 

: 00. .59; 



VAR (*variables publicly defined in this module.*) 



CurrentData 
Operating/ Panic 



SystemData; 

boolean; 



PUBLIC GetData; (*GetData Module containing GetData & StoreData*) 

PROCEDURE GetData(VAR CurrentData : SystemData) ', 
PROCEDURE StoreDataCVAR CurrentData : SystemData) ; 

PUBLIC Operation; (*0peration Module containing OperateSy stem/ 
StartUpSystem and ShutOouinSystem*) 
PROCEDURE StartUpSystem; 

PROCEDURE 0perateSystem<VAR CurrentData : SystemData) / 
PROCEDURE ShutDoujnSystemCVAR CurrentData : SystemData) ; 



PRIVATE GetData; 

<* end of interface specification 



Figure 7-1. Climate Control Program Listing and Sample Run (Cont'd.) 
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PROCEDURE GetDataCVAR CurrentData: SystemData) ; 
BEGIN 

WITH CurrentData DO BEGIN 

WRITEC'Type the thermostat setting in degrees Celsius 

REAOLN(TharmostatSetting); WRITELN; 

WRITEC'Type the inside temperature reading in Celsius 

READLNCInsideTemp)/' WRITELN; 

WRITEC'Type the temperature of the collector water in 

READLNCCollectorWaterTemp)/' WRITELN/' 

WRITEC'Type the temperature of the tank water in Cels 

READLNCTankWaterTemp); WRITELN; 

WRITEC'Type the temperature of the heated tank mater 

REAOLNCHeated Tank Temp); WRITELN; 

WRITEC'Type the hour of day/ as in 04 or 24:')/' 

READLNCHour); WRITELN/' 

WRITEC'Type the minute of the hour/ as in 01 or 59: ' 

RcADLNCMinute)/' WRITELN/' 

WRITEC'Type the amount of sunlight/ any integer mill 

READLNCAmountOf Sunlight) /* WRITELN; 
END/' C*with CurrentData*) 



PROCEDURE StoreDataCVAR Current Data : SystemOata) ; 
BEGIN 



:') 
:') 

Ce 


Is 


ius 




in 


Ce 


)/' 

do 


fo 



ITri C 

WRI 



wr: 
wr: 

WRI 

WRI 
WRI 
WRI 
WRI 
WRI 

end; c 



r q c e cl 

TELNC 
TELNC 
TELNC 
TELNC 
TELNC 
TELNC 
TELNC 
TELNC 
TELNC 
TELNC 
T E L H /" 
ith 



;ventu?Ily will sto 
tData DQ SEGIN 



'CURRENT DATA IS AS FOLLOWS:'); 
' -,-—.: ---'); 

'Thermostat Setting is '/ThermostatSetting/'C'); 

'Inside temperature is ' / InsideTemp/ ' C ' ) ; 

'Temperature of collector water is ' /Collector WaterTemp. 

'Temperature of tank water is '/TankWaterTemp/'C'); 

'Temperature of the heated tank water is '/Heated TankTer 

'Time of ciay is '/Hour/*: '/Minute)/ 

'Amount of sunlight is '/ AmountQf Sunlight ) /' 

C*a blank line*) 

CurrentData*) 



'O; 

ip/'O; 



**WARNING/ xnput: 

**wss repaired to 

73 58 Q 



"END 
"END 



Summary Information; 

PROCEDURE 
ST0REDATA 
GETDATA 



DFFSET CODE 
04D5H G222H 
0294H 0241H 



SIZE 
5460 
577D 



DATA SIZE STACK SIZE 
0010H 16D 
0010H 16D 



06F7H 1783D 0000H 



104 Lines Read. 

1 Error Qetected. 
33% Utilization of Memory, 



SERIES-III Ppscal-86/ X031 



Source File: :F1 :DUMQP. SRC 
Object Pile; :F1:'0UM0'P.0BJ 
Controls Specified: DEBUG. 



STMT LINE NESTING 
1 10 



SOURCE TEXT: : F1 ; DUM0P. SRC 

C*This is a dummy Operation module/ with dummy Startup System/ 

ShutDownSystem/ and OperateSystem procedures/ 

fpr use with MainControl module in testing phases. 



MODULE Operation; 

C* Interface specification common to all modules *) 

? INCLUDE C:F1:IN SPEC. SRC) 

PU3LIC MainControl/* C*section of interface specification*) 

CONST C*declarations declared publ ic ly in this module*) 



MinimumForExchanger 
MinimumForHeatPump 



35/'C*degrees Celsius*) 
13; 



TYPE C*definitions publicly defined in this module*) 



AirTemperatyre = -20,.120/'C*degrees in Celsius*) 
WaterTemperature =0.-120; 



Figure 7-1 . Climate Control Program Listing and Sample Run (Cont'd.) 



88 



DEBUGGING AND EXECUTING PROGRAMS 



8 


18 








8 
9 


20 
21 






1 
1 



11 


26 





1 


12 


27 





1 


13 


28 





1 


14 


29 





1 


15 


30 








16 


34 








17 


35 








18 


37 








19 


39 








20 


40 









22 


44 








23 


45 








24 


46 









HeatingMethods =(CollectorToExch anger/ 
CollectorToHeatPump/ 
TankToExchanger/ 
TankToHeatPump/ 
HeatedTankToHeatPump/ 
NoMethod); 

SystemData = RECORD 

ChosenMethod 
InsideTemp/ 
ThermostatSetting 
CollectorWaterTemp/ 
TankWaterTemp/ 
HeatedTankTemp 
AmountOf Sunlight 
Hour 
Minute 
END (*SystemOata*>; 



: HeatingMethods; 
: AirTemperature; 



WaterTemperature 
Integer; 
00. .24; 
00.. 59; 



VAR (*variables publicly defined in this module.*) 



CurrentOata 
Operating/ Panic 



: SystemData; 

: boolean; 



PUBLIC GetOata; <*GetData Module containing GetOata & StoreOata*) 

PROCEDURE GetData(VAR CurrentData : SystemOata) ; 
PROCEDURE StoreQata(VAR CurrentData : SystemData) ; 

PUBLIC Operation; (*0peration Module containing OperateSystem/ 
StartUpSystam and ShutDownSystem*) 
PROCEDURE StartUpSystem; 

PROCEDURE OperateSy 5tem(VAR Current Data : SystemData) ; 
PROCEDURE Shut OownSy stem ( VAR CurrentData: SystemData) ; 



PRIVATE Operation; 

(• and of interface specification *) 
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PROCEDURE StartUpSystem; 
BEGIN 

WRITELN ('Climate system is no 

writeln c 

writeln; 
end; 



PROCEDURE OperateSystem(VAR CurrentData : SystemData) ; 
BEGIN 



IN 

ITH 

WRITELN 

WRITELN 

WRITELN 

WRITELN 

WRITELN 

WRITELN 

WRITEC 

CASE Ch 

Coll 

Coll 

Tank 

Tank 

Heat 

NoM 

end; 

WRITELN 
WRITELN 
WRITELN 



entData DO BEGIN 

(♦ = = = = = = = = = = = = = = s = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =* ); 

('The Climate System is now operating.'); 

('The Time is '/ Hour /':'/ Minute) ; 
('The inside temperature is '/ InsideTemp/ 'C ' ) ; 
('The thermostat setting is '/ Thermostat Set ting/ "C ' 
Method chosen to heat the building: '); 

osenMethod OF 

ectorToExchanger : WRITECSolar Collector to Excha 
ectorToHeatPump : WRITECSolar Collector to Heat 
ToExchanger : WRITE('Tank to Exchanger'); 
ToHeatPump : WRITECTank to Heat Pump'); 
edTankToHeatPump: WR ITE( 'Heated Tank to Heat Pumi 
thod : WRITECNo heat required*); 



(*write a blank line. 



nger ') ; 
Pump' ) ; 



end; 

END;(*OperateSystem*) 



PROCE 

BEGIN 

WRITEI 

IF 

WR 



DURE ShutDou>nSystem(VAR CurrentData: SystemData) ; 

I.NC:: :::::::::::::::::::::::::: :::::::::::::::::::::')/ 

Panic THEN WRITELN( 'PANIC occurred/ NORMAL shutdown.') 

ELSE WRITELNCNo panic occurred/ ABNORMAL shutdown. ' ) ; 
ZTELNC:: :::::::::::::::::::::::::::::::::::::::::: :::::'); 

TH CurrentData DO BEGIN 
WRITECLast chosen heating method was: '); 
CASE ChosenMethod OF 

CollectorToExchanger : WRITECSolar Collector to Exchanger')/' 

CollectorToHeatPump : WRITECSolar Collector to Heat Pump*); 

TankToExchanger : WRITECTank to Exchanger*); 

TankToHeatPump : WRITECTank to Heat Pump'); 

HeatedTankToHeatPump: WRITECHeated Tank to Heat Pump'); 

NoMethod : WRITECNo heat required'); 



Figure 7-1. Climate Control Program Listing and Sample Run (Cont'd.) 
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END 
WRI 
WRI 
WRI 
WRI 
WRI 
WRI 
WRI 
WRI 

end; c* 

WRITEL 
WRITEL 
WRITELNCGoodnight/ Irene...'); 



ITELN 
ITELN 
ITELN 
ITELN 
ITELN 
ITELN 
ITELN 
ITELN 
with 
LN<*: 

ln; 



day 

of sun 

ata*> 



tting 
ature 

colle 
f tank 
f the 
S '/Houi 
light i 



Ther 
Insi 
ctor mat 
water is 
eated ta 
/Mi 
s '/Amoi 



mostatSet 
deTemp/ 'C 
er is 

TankWa 

water 
n u t e ) ; 
ntOf Sunlight); 



ting/' 

); 

ollect 
terTem 
is */H 



orWaterTemp 

o; 

eatedTankTe 



• 'o; 
ip/'o; 



**WARNING/ input: 
**was repaired to 
85 78 



'END 
'END 



. (*ShutDouinSystem*) 



Summary Information: 

PROCEDURE 
SHUTDOWNSYSTEM 
OPERATESYSTEM 
STARTUPSYSTEM 

Total 

125 Lines Read. 

1 Error Detected. 
33% Utilization of Memory. 



OFFSET CODE SIZE 

0698H G398* 9230 

Q440H 0258H 600D 

03E2H 005EH 940 



DATA SIZE STACK SIZE 

0010H 16D 

0010H 160 

0010H 16D 



0A30H 260SD 0000H 



0D 0030H 48D 



-RUN PR0GRM<cr> 

Climate system is now on. 

Type the thermostat setting in degrees Celsius:24<cr> 

Type the inside temperature reading in Celsius:21<cr> 

Type the temperature of the collector water in Ce I s i us : 60<c r> 

Type the temperature of the tank water in Celsius:60<cr> 

Type the temperature of the heated tank water in Celsius :70<cr> 

Type the hour of day, as in 04 or 24:13<cr> 

Type the minute of the hour, as in 01 or 59:25<cr> 

Type the amount of sunlight, any integer will do for now:1<cr> 



CURRENT DATA IS AS FOLLOWS: 

Thermostat Setting is 24C 
Inside temperature is 21 C 
Temperature of collector water is 60C 
Temperature of tank water is 60C 
Temperature of the heated tank water is 70C 
Time of day is 13:25 
Amount of sunlight is 1 



Figure 7-1. Climate Control Program Listing and Sample Run (Cont'd.) 
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The Climate System is now operating. 

The time is 13:25 

The inside t emp erature is 2 1 C 

The thermostat setting is 24C 

Method chosen to heat the building: Solar Collector to Exchanger 



Type the thermostat setting in degrees Celsius:24<cr> 

Type the inside temperature reading in Ce I s i us :22<c r> 

Type the temperature of the collector water in Ce I s i us :1 0<c r> 

Type the temperature of the tank water in Ce I s i us :1 0<c r> 

Type the t emp erature of the heated tank water in Celsius:10<cr> 

Type the hour of day, as in 04 or 24:13<cr> 

Type the minute of the hour, as in 01 or 59:30<cr> 

Type the amount of sunlight, any integer will do for now:0<cr> 



CURRENT DATA IS AS FOLLOWS: 



Thermostat Setting is 24C 
Inside temperature is 22 C 
Temperature of collector water is 10C 
Temperature of tank water is 10C 
Temperature of the heated tank water is 10C 
Time of day is 13:30 
Amount of 'sunlight is 

The Climate System is now operating. 

The time is 13:30 

The inside temperature is 22C 

The thermostat setting is 24C 

Method chosen to heat the building: Solar Collector To Exchanger 

PANIC occurred, NORMAL shutdown. 

Last chosen heating method was: Solar Collector to Exchanger 

Thermostat Setting is 24C 

Inside temperature is 22 C 

Temperature of collector water is 10C 

Temperature of tank water is 10C 

Temperature of the heated tank water is 10C 

Time of day is 13:30 

Amount of sunlight is 

Goodni ght , I rene . . . 

Figure 7-1. Climate Control Program Listing and Sample Run (Cont'd.) 

Obviously this book only introduces DEBUG-86. For a complete description, see the Intellec 
Series HI Microcomputer Development System Console Operating Instructions. 
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USING ICE-88™, AN IN-CIRCUIT EMULATOR 

The ICE-88 emulator consists of three circuit boards, a cable, a buffer box, and software on 
disk. The three circuit boaVds fit inside your Intellec Series III development system, and the 
cable and buffer box assembly connects your Series III system to your prototype hardware. A 
forty-pin plug at the end of the cable plugs into your prototype system in place of your pro- 
totype's CPU, allowing the in-circuit emulator hardware to emulate all functions of your pro- 
totype's CPU. If you do not have any prototype hardware, keep the plug's protector closed to 
prevent damage to its pins. 

In-circuit emulation shortens your development time in two ways. It provides symbolic debug- 
ging capabilities and diagnostic hardware debugging capabilities, and it lets you borrow 
resources (like memory) from your Series III system until your prototype system is complete. 

Your program can be loaded into borrowed memory, prototype memory, or any combination of 
the two, and run as if it were resident in the prototype. You can emulate program execution at 
real-time speed or in single- or multiple-instruction steps. You can also stop emulation 
manually at any time to examine system status, or you can specify breakpoints as you can with 
DEBUG-86. 

We will debug the PLMDATA module (first shown in Chapter 5) to see if it performs its port 
input and interpolations correctly. We added statements (shaded in figure 7-2) to the module 
that will execute the procedures. Figure 7-2 shows the listing of the compiled PLMDATA 
module. 

PL/M-86 COMPILER PLMDATA PA 

ISIS-II PL/M-86 H121 COMPILATION D p MOOULE PLMDATA 

OBJECT MOQULE PLACED IN PLMDE3.03J 

COMPILER INVOKED 3Y: PLM86 PLMDE3.SRC DEBUG 

1 PLMDATA: DO; 

2 1 DECLARE START LABEL PUBLIC; 

3 1 DECLARE (SETTING/ TEMPERATURE 5 WORD; 

/* 

INPUTS 



THERMOSTAT$SETTING$?R0M$'0RTS: 

Formal parameters HIGH and LOW receive port numbers as actual parameters. 

Input ports HIGH and LOW: Three 3C0 digits for the thermostat setting: 

Port HIGH, bits 3-0: hundred's digit 
Port LOW/ bits 7-4: ten's digit 
Port LOW/ bits 3-0: unit's digit 

TEMP$0ATA$PR0M$P0RTS: 

Formal parameters HIGH and LOW receive port numbers as act'ual parameters. 

Input port HIGH: Binary ADC output of thermocouple/ high-order 8 bits 
Input port L3W: Binary ADC output of thermocouple/ loui-order 8 bits 



THERM0STAT$SETTING$FR0M$P0RTS: Return WORD with setting in Celsius 
TEMP$0ATA$FR0M$P0RTS: Return WORD uiith temperature in Celsius 



Figure 7-2. Listing of the Modified PLMDATA Module 
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THERMOSTATSSETTINGSFROMSPORTS: 
PROCEDURE (HIGH/ LOW) WORD/' 

DECLARE (HIGH/ LOW) WORD; 

DECLARE (INSPORTSHIGH/ INSPORTSLOW) BYTE; 

DECLARE THERMOSSETTING WORD; 

DECLARE (HUNDREDS/ TENS/ UNITS) BYTE,' 

INSPORTSHIGH = INPUT(HIGH); 
INSPORTSLOW = IN»UT(L3W); 
HUNOREDS = INSPORTSHIGH AND 00001111B; 
TENS = SHR(IN$PCRT$LCW/ 4); 
UNITS = INSPORTSLOW AND 00001 1118; 
THERMOSSETTING = UNITS + 10*TENS + 1 00*HUNDREDS/' 
RETURN THERMOSSETTING/' 
END THERMOSTATSSETTINGSFROMSPORTS; 



/* Another typed procedure to return temperature data/ which 
uses the INTERPOLATE typed procedure. */ 

/* INTERPOLATE is a typed procedure that receives thermocouple 
voltage and returns temperature in Celsius using an 
interpolation routine */ 

INTERPOLATE: 
PROCEDURE(VDLTSIN) WORD/* 

DECLARE V0LTS(*) WDRD DATA (0/ 51 / 1 02/ 1 54/ 206/ 258/ 365/472) ; 

DECLARE T$CEL(*) WDRD DATA (0/ 1 0/ 20/ 30/40/ 50/70/90) ; 

DECLARE (1/ VDLTSIN/ NUMERATOR) WORD,* 

i = o; 

DO WHILE VOLTSIN > VOLTS(I); 
I = I * 1; 

end; 

/* Shift for rounding/ and return Celsius temperature */ 
NUMERATOR = SHL ( ( VOLTSIN-VOLTS ( 1-1 ) ) * (TSCEL ( I ) -TSCEL ( 1-1 ) ) / 1); 
RETURN TSCELCI-1) + SHR (NUMERATOR/ ( VOLTS ( I ) -VOLTS ( 1-1 )) +1 / 1>; 



END INTERPOLATE; 



TEMP$DATA$FROM$PCRTS: 
PROCEDURE (HIGH/LOW) WORD/' 

DECLARE (HIGH/LOW) WORD; 

DECLARE INSPORTSHIGH WORD; /* ADDRESS in McCracken's book 

DECLARE INSPORTSLOW BYTE/" 

DECLARE (THERMOCCUPLESOUTPUT/ TEMPERATURE) WORD; 

INSPORTSHIGH = INPUT(HIGH)/' 

INSPORTSLOW = INPUT(LOW); 

THERM3C0UPLES3UTPUT = SHL ( INSPORTSHIGH, 3) OR INSPCRTSLOW; 

TEMPERATURE = INTERPOL ATE (THERM0C3UPLES0UTPUT) ; 

RETURN TEMPERATURE; 

END TEMPSDATASFROMSPORTS; 

START: DO; 

SETTING = THERM0STAT$SETTING$FROMSP0RTS(2OO0/1O00); 
TEMPERATURE = T EMPSD AT ASF ROMSPO RT S ( 200/ 1 00 ) /' 

END start; 
END plmoata; 



MODULE INFORMATION: 

CODE AREA SIZE = 012C* 3330 

CONSTANT AREA SIZE = 0020m 320 

VARIABLE AREA SIZE = 0016H 22D 

MAXIMUM STACK SIZE = 0012H 18D 
101 LINES READ 
PROGRAM ERROR(S) 

END OF PL/M-86 COMPILATION 



Figure 7-2. Listing of the Modified PLMDATA Module (Cont'd.) 
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We also have to link the LARGE. LIB run-time library to this module, and locate the final 
module: 

-RUN LINK86 : F1 : P LMDAT . OB J , : F1 : LARGE . LIB TO : F1 : P LMDAT . LNK<c r> 



-RUN L0C86 :F1 :PLMDAT. LNK RESERVEC200H TO 77FFH) TO : F1 : P LMDAT . 86<c r> 



To use the ICE-88 emulator, copy the ICE88 program from its disk ohto a disk in your system 
(for example, the system disk in drive 0), and type the following command: 

-ICE88<cr> 

You can now use the ICE-88 LOAD command to load the module and its symbols: 

•LOAD : F1 : P LMDAT . 86<c r> 
*SYMBOLS<cr> 

The SYMBOLS command displays the entire symbol table. We can start emulation with the GO 
command, specifying both a starting location and a breakpoint. We can°use the .START label 
as a starting location, and specify line #8 as a breakpoint: 

•GO FROM .START TILL #8 EXECUTED<cr> 
EMULATION BEGUN 



EMULATION TERMINATED, C S : I P = 0781 : 0040H 

At this point, we want to change the contents of the 8088 ports so that the 
THERMOSTAT$SETTING$FROM$PORTS procedure can pick them up: 

• PORT 2000 = ;Hundred's digit of BCD thermostat setting. <cr> 
•PORT 1000=24 ;Tens and units of BCD setting. <cr> 
•GO FROM CS:IP TILL .SETTING WRITTEN<cr> 
EMULATION BEGUN 



EMULATION TERMINATED, CS : I P = 0781 : 002CH 

Note that a semicolon and comment is allowed on an ICE-88 command line. We assigned 24H to 
port 1000 to obtain a 2 as the tens digit and a 4 as the units digit (to represent a thermostat 
setting of 24 degrees Celsius). Then we resumed emulation from the program counter (PC) 
until a value was obtained for the .SETTING variable. At this point, we can check the contents 
of .SETTING: 

•WORD .SETTING<cr> 
WOR 0794-.0024H = 0018H 

18 hexadecimal is 24 in decimal. 
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Since .SETTING is correct, we can set the contents of the other two ports and continue 
emulation: 

• PORT 200 = ; H i g h order 8 bits are zero.<cr> 

•PORT 100=66 ;Low order equal 66H, or 102 in decimal .<cr> 

• GO FROM CS : I P TILL #43 EXECUTED<cr> 
EMULATION BEGUN 



EMULATION TERMINATED, C S : I P=0781 : 003 B H 
•WORD .TEMPERATURE<cr> 
WOR 0794:0026H = 0014H 

14 hexadecimal is 20 in decimal. 

We have a temperature reading of 20 degrees Celsius. 

Obviously this session only introduces the ICE-88 emulator. The ICE-88 In-Circuit Emulator 
Operating Instructions for ISIS-II Users contains both tutorial and reference information on the 
ICE-88 emulator. The similarities between DEBUG-86 and in-circuit emulators enhance their 
usefulness in software development efforts, since both provide symbolic debugging. In-circuit 
emulation also lets you emulate all of your prototype CPU functions, even though your pro- 
totype CPU is not installed, and even if your prototype has not been built. It is a powerful 
debugging and diagnostic tool for both the hardware and software of your final product. 

EXECUTION ENVIRONMENTS 

The Intellec Series III system provides an 8086 execution environment and operating system 
support— the support your program needs to be able to access devices and files. When you 
link the run-time support libraries to your Pascal-86 program, you are providing the software 
your program needs to "talk" to the Series III operating system. 

You can also run Pascal-86 programs in other systems, or in dedicated application 
environments, as long as you provide the run-time support software. For example, you could 
transfer your program to RAM on an SDK-86 (System Design Kit with an 8086), or to RAM on an 
iSBC 86/12A Single Board Computer system, by first using the OH86 utility described in the 
iAPX 86,88 Family Utilities User's Guide for 8086-Based Development Systems to convert the 
program to hexadecimal object format, and then using an appropriate tool to load the program 
into your execution board (the ICE-86 In-Circuit Emulator, the SDK-C86 Software and Cable 
Interface, or the iSBC 957 Interface and Execution Package). 

You could also transfer your program to ROM on an SDK-86 kit, iSBC Single Board Computer 
system, or your own custom-designed hardware, by using the Universal PROM Programmer 
(UPP) with its Universal PROM Mapper (UPM) software. 

Figure 7-3 shows possible execution paths for Pascal-86 programs. 

The Series III operating system has a standard set of primitives (service routines) that any pro- 
gram can use. Intel supplies run-time support libraries that act as an interface between your 
Pascal-86 program and the Series III system. By replacing this interface with your own custom- 
designed interface, you can use the same Pascal-86 programs on other non-Intel systems. 
With each future Intel system, Intel will supply the appropriate run-time interface so that your 
present programs will also run in future Intel systems. 
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Figure 7-3. Possible Execution Paths for Pascal-86 Programs 



A system library is also supplied for PL/M and assembly language programs; this library (or 
set of libraries) also acts as an interface between your programs and the Series III operating 
system. By supplying your own interface, you can also use these programs on other systems. 

The Series III system was designed in this modular fashion to provide operating system sup- 
port without necessarily binding programs to that particular system. It was designed to be 
used as part of your application (as the operating environment), but it was also designed to be 
useful for the development of applications that do not need full-blown operating system sup- 
port. With several layers of interfacing between the system and your program, you can choose 
exactly how much system you want in your final application, and you can preserve your soft- 
ware investment with an eye to the future. 
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Within this index, formatter a page number 
means and the following page {or pages). 



&" continuation character, 23ff 
< >" (angle brackets) in CREDIT, 35ff 
>" (angle) prompt, 23f 
<cr>", See also RETURN key, 10, 35 
*" (asterisk) in CREDIT command area, 29f 
*" (asterisk) in pathname, 19ff 
@" in CREDIT, 30 
— ", See also prompt, 10, 13, 23 
!" in CREDIT, 35ff 

(*" and "*)" comment symbols, 42 
/*" and '?/" comment symbols, 64 
%" (percent) symbols for parameters, 25 
?M" in CREDIT, 37 
;" (semicolon) for comments, 24f 
8080/8085 processor family, 1 , 22 

8085 execution environment, Preface, 22ff, 
25 

8086 execution environment, Preface, 7f, 16, 
22ff , 25, 55, 68, 78f 

8086/8087/8088 macro assembler, 13ff, 48, 

63, 68ff 
8086/8088 Utilities, 13ff 

8087 processor, 78 

8087. LIB (Pascal-86 run-time library), 78 

8087 software emulator, 78 

86 extension, 16, 22ff, 25, 55, 79 

8088 processor, 61 

87NULL.LIB (Pascal-86 run-time library), 77f 



A switch with FORMAT command, 21 

absolute modules, 79 

actual parameter, 24 

ADD command (LIB86), 76 

add text mode (CREDIT), 31f 

addresses, See physical memory address 

address, reference to, 48, 75ff 

Aesop, 81 

algorithm for climate control system, 42, 63 

AND operation, PL/M-86, 64 

angle brackets (CREDIT), 35ff 

angle (>) prompt, 23f 

application, climate control, 2ff 

arithmetic, real, 6, 78 

array, PL/M-86, 68 

assembler, 8086/8087/8088, 13ff, 63, 68ff 



assembly language, 6, 25f, 48, 63, 68ff, 79, 82 
asterisk in CREDIT command area, 29f 
asterisk in pathname, 19ff 
ATTRIB command, 18, 21 
attributes, file, 11f,15f, 18 



backup of text file, 16, 19, 38f 

BAK extension, 16, 19, 38f 

base address, segment, 83 

BCD digits, 64ff 

binary, 83f 

binary-coded decimal digits (BCD), 64ff 

BIND control (LINK86), 78f, 81 

binding modules, 75ff, 78f 

bit-shift operations, PL/M-86, 64, 68 

black printing, 10 

block diagram of climate system, 3 

blocks, file 11, 28, 30 

blueprinting, 10 

BOOLEAN command (DEBUG-86), 82ff 

BOOLEAN type, 46, 82ff 

breakpoints, debugging, 92 



carriage return, See RETURN key 
Celsius degrees, 5, 24, 63ff, 68, 94f 
character pointer (CREDIT), 32ff 
choosing software tools, 5f 
climate control application, 2ff, 41 ff, 44f, 49ff, 

57ff, 63, 85ff, 92f 
CNTL-A command (CREDIT), 31 
CNTL-N (CREDIT), 32, 35 
CNTL-P (CREDIT), 32, 35 
CNTL-V (CREDIT), 28ff,32ff 
CNTL-Z (CREDIT), 30 
:CO: (console output), 39 
CODE control, PL/M-86, 68, 70ff 
collector water, solar, 42, 45f 
command area (CREDIT), 28f 
command iteration, 27, 35ff 
command mode (CREDIT), 32f 
command sequence, 25 
command sequence definition file, 24f 
commands, executing, 22ff, 25 
comment symbols — Pascal, 42 
comment symbols — PL/M, 64 
comments, semicolon, 24f 
compilations, separate, 41 



99 



INDEX 



compiler, See also Pascal-86 or PL/ M-86, 16, 

55f 
compiler controls, Pascal-86, 55f 
compiler controls, PL/M-86,68 
console output, 39 
continuation character (&), 23ff 
Control key, See CNTL 
Control lines, source file, 51 , 56 
Controls, Pascal-86, 55f 
convert voltage to temperature, 5, 63ff , 68 
cooling methods, 3ff 
COPY command, 19ff 
copying files to disks and devices, 1 9f f 
CP, See character pointer 
CREATE command (LIB86), 76 
creating a text file, 28f 
CREDIT text editor, 2, 11 , 13, 16, 20, 27ff, 30ff, 

33ff, 36ff, 42 
CS extension, 25 
CS register (code segment), 83f 
CSD extension, 24f 
cursor (editing text), 28ff 
cursor movement keys, 32f 

dash, See prompt 
DATA initialization, PL/M-86, 68 
data passing between modules, 7, 48f 
data type, REAL (Pascal-86), 78 
data types, Pascal-86, 45f , 48f 
datatypes, PL/M-86, 64, 66 
DEBUG-86, 7, 55f, 75, 78, 81 ff, 84ff 
DEBUG control, Pascal-86, 55f, 82 
debuggers, 81 

debugging, 2ff, 5ff, 55f, 75, 78, 81ff, 84ff 
default directory (:F0:); 19ff 
default settings, compiler controls, 55 
DEFINE command (DEBUG-86), 83 
defining software, 3ff 
degrees in Celsius, 5 
DELETE command, 18ff 
deleting files, 18ff 

Determine Method procedure, 47f , 51 , 86 
device names, 20f 
devices, copying files to, 19ff 
Dijkstra, E.W.,41 
DI'R command, 10ff,16f, 21 
directory, default (:F0:), 19ff 
directory listing, 10ff, 17 
directory specifier, See pathname 
disassembled display (DEBUG-86), 84 
disk blocks, See file blocks 
disks, See formatting disks 
disks, copying files to, 19ff 
displaying text file, 39 
drive 0, See system disk, 
See also RESET key 

E8087 emulator, 78 

E8087.LIB (Pascal-86 run-time library), 78 
editor, text (CREDIT), 2, 16, 27ff, 30ff , 33ff, 
36ff , 42 



emulation, in-circuit (ICE), 1f, 5ff, 8, 79, 92ff 

emulator, 8087, 78 

end of text, 28 

ending text editing session, 38f 

English, 5f, 27, 41 

environment, execution, 81 , 95f 

Series III operating, 77ff 
EQ (quit) command (CREDIT), 38f 
ESC (Escape) key, 29 
EVALUATE command, 83f 
EX command (CREDIT), 28, 30, 38f 
exchanger, See climate control 
exclamation point in CREDIT, 35ff 
executable programs, 75f 
executing commands and programs, 22ff, 

25, 81ff 
execution environment, 8085, Preface, 22ff, 

25, 81 , 95 

8086, Preface, 8, 16, 22ff , 25, 55, 68, 78f, 81 , 
95 
execution, interactive mode, 23ff 

non-interactive mode, 24f 

paths for Pascal-86 programs, 
95f 
execution vehicle, 81 
EXIT command (LIB86), 22FF, 25, 76 
extension, filename, 11 , 16, 22, 25 
extensions to standard Pascal, Intel, 55 
external procedures, 76f 
external references, 75ff 

F attribute, 12, 15, 18, 21 
F (Find) command (CREDIT), 34 
:F0: (default directory), 19ff 
file attributes, 11f,15f, 18 

blocks, 11, 28, 30 

command sequence definition, 24f 

copying to disks and devices, 19ff 

deleting, 18ff 

format (F) attribute, 12, 15, 18, 21 

input/output procedures (Pascal-86), 78 

invisible (I) attribute, 12, 18 

length, 11 

library, 76f 

listing, 16, 42, 55ff, 58ff, 68, 71ff 

macro, 16 

object, See object module 

overlay, 16 

renaming, 18ff 

source, 27, 55f, 68 

system(s) attribute, 12, 14f, 18, 21 

text, 27ff 

text backup, 16, 19, 38f 

update with COPY command, 20 

write-protected (w attribute), 11 f, 18 
filename, 10ff,15ff,18ff,21ff,24f 
filename matching, 19ff 
files, manipulate, 10, 15 

naming conventions, 15f 
final product, using, 8 
finding text, 33f 
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flexible disks, See also formatting disks, 14f 

FOR, used with DIR command, 17f 

formal parameters, 25 

FORMAT command, 13ff, 18, 21 

formatfiles,12,15,18, 21 

formatting disks, 10, 13ff, 16ff, 20f 

FORTRAN-86, 5f 

FORTRAN language, 6, 27, 63f 

FROM with FORMAT command, 21 



GETDATA module, 4ff, 7, 44f, 50, 55ff, 58ff, 

66, 77, 87ff 
GetData procedure, 44, 46f, 50, 52f, 66, 87 
glitch, hidden, 81 
GO command (DEBUG-86), 83f 
GO command (ICE-88), 94 
Goethe, von, 75 
Grove, Andrews., 1,9 



hard disk subsystem, 12ff 

hardware development process, Iff, 7f 

HD COPY command, 21 

heat pump, See climate control 

heating methods, 3ff, 42, 45f 

hexadecimal, 83f 

hexadecimal object format, 8, 95 

hidden glitch, 81 

hiding information, 46f 

high-level languages, 2ff , 5f , 41 , 55, 63f , 69f, 

75, 79, 82 
HOME key (CREDIT), 28f,32f 
:HP: (paper tape punch), 20 



iAPX 86, 88 processor family, 1 , 7f, 22 

ICE-86,1f,7f,79,92ff,95 

ICE-88, 1f,7f, 79, 92ff, 95 

IDISK command, 15, 18, 21 

in-circuit emulation (ICE), 1f, 5ff, 8, 79, 92ff 

INCLUDE control, Pascal-86, 51 , 56 

information-hiding, 46f 

input/output procedures (Pascal-86), 61 , 78 

inserting text, 28f, 31 f 

interactive 8086 mode, 23 

interactive execution, 23ff 

Interface, iSBC 957, 8,95 

Software and Cable (SDK-C86), 8, 95 
interface specification, Pascal-86, 47, 49f, 51 
INTERPOLATE procedure, 66ff, 93 
invisible file attribute, 12, 18 
Irene, goodnight, 54, 80, 91 
IP (instruction pointer) register, 83f 
iSBC86/12A system, 8, 95f 
iSBC 957 Interface and Execution Package, 

8,95f 
iSBC (Single Board Computer) System, 8, 

95f 
ISIS-II operating system, See also operating 

the Series III system, 10ff, 13ff, 16ff, 23 



J (jump) command (CREDIT), 32ff 



keyboard, 29 



L (Line) command (CREDIT), 37 

language diversity, 63 

languages, high-level, 2ff, 5f, 41 , 55, 63f, 69f, 

75, 79, 82 
LARGE control, PL/M-86, 68 
LARGE. LIB (run-time library), 77f, 94 
Ledbetter, Huddie ("Goodnight Irene"), 54, 

80,91 
length, file, 11 
LIB extension, 16 
LIB86.86 utility, 22, 75f 
librarian utility, 22, 75f 
libraries, run-time, 14f, 23ff, 75ff, 78f, 94 
library file, 76f 

management, 2, 5ff, 16, 76 

module, 16, 75ff,78f 

of routines, 2ff, 5ff, 13, 16, 75ff, 78f 
line feed character, 29 
line printer, 20,39 
line terminator (CREDIT), 29 
LINK86.86 Utility, 23f, 75ff, 78f, 81 
linkage libraries, 13ff, 16, 23ff, 75ff 
linker utility, 16, 75ff, 78f 
linking modules, 2ff, 5f, 16, 75ff, 78f 
LIST command (LIB86), 76 
listing of PLMDATA module, 71 ft, 92f 
listings, program, 16, 42, 55ff, 58ff, 68, 71 ff, 

85ff , 92f 

of test modules, 57ff, 85ff , 92f 
LNK extension, 16, 79 
LOAD command (DEBUG-86), 82f 
LOAD command (ICE-88), 94 
loader, RUN, 78f 

loaders, ICE (in-circuit emulation), 79, 95 
load-time locatable (LTL) module, 78f 
LOC 86.86 utility, 16, 75ff, 79 
locatable program, 77ff 
locater utility, 16, 75ff,78f 
locating modules, 2ff, 5f, 16, 75ff, 78f 
:LP: (line printer), 20, 39 
LST extension, 16 
LTL module (load-time locatable), 78f 



M (Macro definition) command (CREDIT), 36f 

MAC extension, 16 

machine code, 69f 

macro assembler, 8086/8087/8088, 13ff, 48, 

63, 68ff 
macro, assembly language, 69f 

CREDIT, 36f 

definitions, macro assembler, 69f 

file, 16 

processor language, 69f 
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MAIN module, 4ff, 7, 41 ff, 46f, 49f, 55ff, 58ff, 

63, 77f, 85ff 
main program (climate control system), 43f, 

43f, 49, 51ff, 63, 77, 85ff 
MainControl (main module), 43f, 47, 49f, 51ff, 

63, 77, 82f , 85ff 
matching filenames, 19ff 
memory addresses, See also physical 
memory 

addresses, 7, 75ff, 78f 
methods, heating and cooling, 3ff, 42, 45f 
MF command (CREDIT), 37 
modular programming, 6ff, 4lf, 46f, 49, 63, 

7pf 
modular structure, See also modular 

programming, 77 
module, absolute, 79 

concept of, 5FF, 41 , 46f , 49 

heading, Pascal-86, 45, 49f 

LTL (load-time locatable), 78f 

names, 82f 

object, See object module 

subordinate, 41, 77 
modules, binding, 75ff, 78f 

program, 2ff, 6ff, 16, 41f, 44f, 46f, 49f, 63, 
76ff, 85ff , 92f 
monitor, 9f 
moving around in text file, 32ff 

naming conventions for files, 15f 

Nassi-Schneiderman chart, 4 

NDP(8Q87),78 

NOEXTENSIQNS control, Pascal-86, 55 

non-interactive execution mode, 24f 

NOPRINT control, PaspaW, 55 

numeric data processor (8087), 78 

object format, hexadecimal, 8, 95 

object module also called object file, 16, 55f, 

68, 75f 
OBJ extension, 16, 55 
octal, 83f 

offset value, base address, 83 
OH86 utility, 8, 95 
Operate System procedure, 44, 46ff, 50, 52ff, 

83f , 89 
operating environment, Series III, 77ff 
operating system procedures, 25, 78, 95 

Series III, See also operating the Series III 
system, 79, 95 

summary of, 25 
operating the Series III system, 9ff, 12ff, 15ff, 

I8ff,21ff,24f,78 
OPERATION module, 4ff, 7, 44, 50, 55ff , 58ff , 

77, 82f , 88ff 
operation of climate system, 3ff, 44, 46f 
OR operation, PL/M-86, 64, 68 
output disk or device, 19ff 
overlay file, 16 
OV0 extension, 16 



P (switch), used with COPY, 15 
P86RNx.LIB (Pascal-86 run-time libraries), 

77f 
panic condition in climate system, 42, 44 
paper tape punch device, 20 
parameter, actual, 24 

parameter passing between modules, 7, 48 
parameters, formal and actual, 25 
parse phase, Pascal-86 compiler, 56 
PASC86.86 Compiler, 23f,55f 
Pascal language, 5ff, 27, 39, 41f, 45f, 48f, 55, 

63f,65f 

record, 41, 48 
Pascal-86 Compiler and Language, 5f, 14, 23, 

25,41ff,45,48f,55f,63f,66,68f,95f 

data types, 45f,48f 

run-time libraries, 77ff 
pass data by reference, 7, 48f 

by value, 7, 48f 
pathname matching, 19ff 
pathnames, 15ff, 18ff, 21ff, 24f 
percent symbols for parameters, 25 
physical memory address, 7, 75ff, 78f, 83ff 
Pidgin Pascal, 6, 27, 39f 
PL/M-86 Compiler and Language, 5f, 14, 48, 

63ff, 66ff , 69ff 

data types, 64, 66 
PLM86.86 Compiler, 68 
PL/M language, 6, 25f, 45, 63ff, 66, 69f, 79 
PLMDATA module, 68, 71 ff, 92f 
pointer, character, 32ff 
ports, input/output, 49, 61 , 64ff 
primitives, Series III operating system, 70, 

78, 95 
PRINT control, Pascal-86, 55 
printing, blue or black, 10 
printing text file, 39 
PRIVATE definitions, Pascal-86, 49f 
procedure, typed (PL/M), 64 
procedures, built-in (Pascal-86), 76f 

external, 76f 

file input/output (Pascal-86), 78 

operating system, 25 
processor, 8080/8085, Iff, 7, 61 

iAPX 86, 88 (8086 and 8088), Iff, 7, 61 

numeric data (8087), 78 
product, final, 8 
program, executable, 75f 

locatable, 77 

listings, 16, 42, 55ff,58ff, 68,71 ff 

main (climate control system), 43f, 46f, 49, 
51 ff 

modules, 2ff, 6ff, 16, 41f, 44f, 46f, 49f, 63, 
76ff 

source statements, See also source file, 
55, 85 
programmable read-only memory, 2, 8 
programming the system, 9, 70 
programs, executing, 22ff, 25 
PROGRM.86 (test version of application), 

77f , 79f , 82ff , 90f 
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PROM, See programmable read-only 

memory 
prompt, dash (—), 10, 13, 23 
prototype, hardware, 7f , 48f , 61 , 92 
PUBLIC definitions, Pascal-86, 49f 



RAM, See random access memory 
random access memory, 8, 95 
READLN procedure (Pascal-86),^1, 76f 
read-only memory (ROM), 8, 81 , 95 
real arithmetic, 6, 78 
REAL data type (Pascal-86), 78 
record, Pascal, 41, 48 
recursive, See self-reference 
reference, pass data by, 7, 48f 

to address, 48, 75ff 
references, external, 75ff 
RENAME command, 18ff 
renaming files, 18ff 
RESERVE control (LOC86), 79 
RESET key, 9f,13f 
RETURN key, 10, 12ff, 15, 20f, 28f, 35 
ROM, See read-only memory 
RPT (Repeat) key, 29 
RUBOUTkey,29 

RUN command, 14, 22ff, 25, 68, 75ff, 78f, 81 
run-time libraries, 14f, 23ff, 61 , 70, 75ff, 78f, 

94f 
run-time system, See also run-time 
libraries, 76ff 



S attribute, 12, 14f, 18, 21 

S (Substitute) command (CREDIT), 34f 

screen mode (CREDIT), 32f 

scrolling text, 32f 

SDK-86, 8, 95 

SDK-88, 8, 95 

SDK-C86 Software and Cable Interface, 8, 

95 
segment base, 83 
self-reference, See recursive 
semicolon for comments, 24f, 94 
separate compilations, See also modular 

programming, 41 
Series II monitor, 9f 

Series II system, Preface 
service routines, operating system, 70, 78, 

95 
shift operations, PL/M-86, 64, 68 
SHL (shift left) operation, PL/M-86, 64, 68 
SHR (shift right) operation, PL/M-86, 64, 68 
ShutDownSystem procedure, 44, 46f, 50, 54, 

89f 
Single Board Computer (iSBC) system, 8 
size control, object module, 68 
Software and Cable Interface (SDK-C86), 8, 

95 
Software definition, 3ff, 30f 
Software development process, Iff 



Solar collector, 2ff, 42, 45f 

Source disk, 15, 19ff 

source file or program, 27, 55f, 68 

SQ (Substitute after Query) command 

(CREDIT), 34f 
SRC extension, 16 

StartUpSystem procedure, 44, 46f, 50, 53, 89 
STEP command (DEBUG-86), 84 
stepwise refinement, 2ff 
StoreData procedure, 45f, 50, 53, 87f 
Strachey, Christopher, 63 
string, 34f 
structure, PL/M-86, 48 

of software, 4ff 
SUBMIT command, 24f 
subordinate modules, 41, 77 
substituting text, 33f 
summary of operating system, 25 
switch used with DIR, 12, 17 
SYM keyword (DEBUG-86), 83 
symbol table (DEBUG-86), 82ff 
symbolic debugging, 5ff, 82ff 
symbols, 7, 82ff 

SYMBOLS command (DEBUG-86), 82f 
SYMBOLS command (ICE-88), 94 
System Design Kits, 8, 95f 
system climate control, 2ff, 41ff, 44f, 49ff, 

55ff , 58ff , 63, 85ff , 92f 

disk, 9ff, 12ff, 15ff, 21 

files, 11ff, 14, 18, 21 

operation, Series III, See operating the 
Series III system 

run-time, See also run-time libraries, 76ff 

turning on, 9f 



tags (CREDIT), 32f 

tank, water (climate system application), 42, 

45f 
TD (tag delete) command (CREDIT), 32 
TE (tag for end), used in CREDIT, 32f 
teletype output, 39 

TEMP$DATA$FROM$PORTS, 66ff, 92f 
temperature conversion program, 24 
temperature data, 3f, 49, 63ff, 68 
terminator, line (CREDIT), 29 
text area (CREDIT), 28f 

creating and inserting, 28f, 31 

editing, ending session, 38f 

editor (CREDIT), 2, 16, 27ff, 30ff, 33ff, 36ff, 
42 

file, 27ff 

file backup, 16, 19, 38f 

file, displaying, 39 

file, printing, 39 

finding, 33f 

scrolling, 32f 

substituting, 33f 
thermocouple voltage, 5, 61 ff , 68 
THERMOSTAT$SETTING$FROM$PORTS 

procedure, 64ff,92ff 
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•TO: (teletype output), 39 

tools, software, 4ff, 7ff 

top-down design, 2ff, 41 

TPWR (typewriter) key, 29 

TS (tag set) command (CREDIT), 32 

TT (tag for top), used in CREDIT, 32f ■ 

turning on your system, 9f 

TXT extension, 16 

type, data, 45f, 64, 66 

TYPE definition, Pascal, 46, 48 

type, REAL (Pascal-86), 78 

typed procedure, PL/M, 64 

typeface, blue or black, 10 



UPM,See universal PROM mapper 

UPP,See universal PROM programmer 

using the system, 9 

using your final product, 8 

utilities, Series III, 2ff, 6ff, 13, 75ff, 78f 



value, pass data by, 7, 48f 
VAR definition, Pascal, 46, 49 
vehicle, execution, 81 
video display (CREDIT), 28 
voltage, thermocouple, 5, 61 ff, 68 



Universal PROM Mapper (UPM), 8, 95 
Universal PROM programmer (UPP), 2, 8, 95 
uparrow(t), 29 
update files, 20 



W attribute, 11f, 18 

wild card filename, See also filename 

matching, 21 
WRITELN procedure (Pascal-86), 61 , 76f 
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